用perl在char和Tchar之间转换

用perl在char和Tchar之间转换,perl,winapi,Perl,Winapi,为了在windows上将字符字符串转换为Tchar,有一个名为Text的宏,如下所示: TCHAR X[20]=文本(“ABCDEDF”) 我需要用perl实现同样的功能,使用win32::api将字符串作为TCHAR发送到函数 i、 e 我的$string=“ABCDEDF”; 如何将C++转换为TCHAR,并使用Win32:API模块将其发送给一些函数。与C++有什么关系? use Encode qw(encode decode); my $windowsString = encode("U

为了在windows上将字符字符串转换为Tchar,有一个名为Text的宏,如下所示:

TCHAR X[20]=文本(“ABCDEDF”)

我需要用perl实现同样的功能,使用win32::api将字符串作为TCHAR发送到函数

i、 e

我的$string=“ABCDEDF”;
如何将C++转换为TCHAR,并使用Win32:API模块将其发送给一些函数。

与C++有什么关系?
use Encode qw(encode decode);
my $windowsString = encode("UCS-2LE", "ABCDEDF");