From: Dobrica Pavlinusic Date: Wed, 22 Feb 2012 20:10:11 +0000 (+0100) Subject: cleanup pnm files, query printer status X-Git-Url: http://git.rot13.org/?p=Printer-Zebra.git;a=commitdiff_plain;h=f2a662b877919457bbcfc11b2ba9c6589607b817 cleanup pnm files, query printer status --- diff --git a/print.cgi b/print.cgi index a3cd5d8..249c1f0 100755 --- a/print.cgi +++ b/print.cgi @@ -38,6 +38,11 @@ close($to); system "./pbm2ZPL.pl $tmp/$barcode.pnm | rlpr --printhost=$ip --printer=zpl --windows --verbose"; +unlink "$tmp/$barcode.pnm"; + +my $status = `rlpq --printhost=$ip --printer=zpl 2>&1 | tee $tmp/$ip.status`; +die "$status\n" if $status =~ m/error/; + if ( my $return = $q->param('return') ) { print $q->redirect( $q->param('return') . '&station=' . $ip ); } else {