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의 문서 뷰어나 시스템 인쇄 대화 상자를 사용하는 등 수동으로 인쇄하는 경우 출력이 올바르게 인쇄됩니다.

내 코드에서 왜 이런 일이 발생합니까?

내가 뭔가를 놓쳤거나 잘못 구성했나요?

프린터로 보낼 때 강제로 방향을 맞추는 방법이 있나요?