Perlを使用したPDF印刷

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

関連情報