我可以从perl向POS打印机发送ESC d命令吗?

我可以从perl向POS打印机发送ESC d命令吗?,perl,printing,Perl,Printing,我有一台Star TSP100打印机,但我的问题很少 我的问题是,我对编程没有我应该熟悉的那么熟悉——但我正在学习 星型打印机的程序员参考说,如果我向打印机发送ESC d,这将激活内置切割器,我非常希望这样做 我的问题是,如果可能的话,我不知道如何从Perl中发送这样的转义代码 我真的很感激你给我的建议。 它是用Clipper编写的,但很容易理解,因为它使用标准的Windows打印API,99%的Win32编程语言都可以调用它;它可以(除其他外)写成“\e”或“\033”。因此,假设您有一个打开

我有一台Star TSP100打印机,但我的问题很少

我的问题是,我对编程没有我应该熟悉的那么熟悉——但我正在学习

星型打印机的程序员参考说,如果我向打印机发送ESC d,这将激活内置切割器,我非常希望这样做

我的问题是,如果可能的话,我不知道如何从Perl中发送这样的转义代码

我真的很感激你给我的建议。


它是用Clipper编写的,但很容易理解,因为它使用标准的Windows打印API,99%的Win32编程语言都可以调用它;它可以(除其他外)写成
“\e”
“\033”
。因此,假设您有一个打开打印机设备的手柄,您只需打印$fh“\ed”

即可使用CPAN中的my module printer::Thermal

顺便说一句,esc d用于打印和进纸线

您可以使用内置的功能剪纸使事情更简单

$printer->cutpaper;
$printer->print;
$printer->cutpaper;
$printer->print;