projects
/
Printer-Zebra.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
| inline |
side by side
getter usage example
[Printer-Zebra.git]
/
pbm2ZPL.pl
diff --git
a/pbm2ZPL.pl
b/pbm2ZPL.pl
index
7223742
..
4b8f02c
100755
(executable)
--- a/
pbm2ZPL.pl
+++ b/
pbm2ZPL.pl
@@
-8,7
+8,7
@@
use Data::Dump qw(dump);
my $compress = $ENV{COMPRESS} || 1;
-my $pnm_file = shift @ARGV || die "usage: $0 print.pnm";
+my $pnm_file = shift @ARGV || die "usage: $0 print.pnm
> print.zpl\n
";
open(my $fh, '<', $pnm_file);
my $p4 = <$fh>; chomp $p4;