Как получить ответ на задание печати файла пользователю с принтера с помощью CUPS в Linux

Я пытаюсь распечатать файл на удаленном сервере с помощью команды CUPS. Пользователь должен знать статус задания. Как получить от него ответ. Вот мой код:

 #!/usr/bin/perl
 my $response = system("lpr -P laserJet123   -o raw -T test_womargin abc.txt");
 print $response;

linux printing perl cups
person user3829086    schedule 05.06.2015    source источник
comment
Пожалуйста, проверьте system() документы; perldoc.perl.org/functions/system.html   -  person mpapec    schedule 05.06.2015
comment
@ Сухой27, perldoc.perl.org/functions/system.html очень помогает.   -  person user3829086    schedule 05.06.2015

Ответы (1)


arrow_upward
0
arrow_downward

$? возвращает статус ответа системной команды.

system("lpr -P laserJet123   -o raw -T test_womargin abc.txt");
if ($? == -1) {
print "failed to execute: $!\n";
}
elsif ($? & 127) {
printf "Job failed with signal %d, %s coredump\n",
($? & 127), ($? & 128) ? 'with' : 'without';
}
else {
 printf "Job exited with value %d\n", $? >> 8;
}
person user3829086    schedule 05.06.2015