☰

使用 Perl 打印 PDF

tag-icon • tag-icon linux perl printing cups
使用 Perl 打印 PDF

我有一个脚本，可以创建 PDF 并将其发送到运行 CUPS 的远程打印服务器。

使用Net::Printer，我设置了打印机：

my $print_server        = "remote_print.server";
my $printer             = "lp1234";

my $lineprinter = new Net::Printer( 
                          filename    => $pdf,
                          printer     => $printer,
                          server      => $print_server,   
                          port        => 515
);

[...]

# Print and get printer stauts.
$result = $lineprinter->printfile();

远程打印机是标签打印机，斑马ZT420，配置有斑马PPD。

现在，问题是，无论我如何设置 PDF 文件（强制其为垂直或水平），打印的标签都会以某种方式在某个地方被强制为垂直方向，而不是水平方向。

当手动打印时，例如使用 GNOME 上的文档查看器或系统打印对话框，可以正确打印输出。

为什么我的代码会出现这种情况？

我错过了什么或配置错误吗？

有没有办法在将其发送到打印机时强制定向？

答案1

除非可以在其他地方更改设置，否则我可能会尝试将 Zebra PPD 文件的第 28 行从 更改*LandscapeOrientation: Plus90为*LandscapeOrientation: Plus0.

相关内容