Changeset c5a98db for client/bin/gbr
- Timestamp:
- Jul 5, 2010, 3:30:19 PM (14 years ago)
- Branches:
- master, debian, mac, no-cups, web
- Children:
- 618236b, a81397c
- Parents:
- 03e2535
- git-author:
- Jessica B. Hamrick <jhamrick@…> (07/05/10 15:30:19)
- git-committer:
- Jessica B. Hamrick <jhamrick@…> (07/05/10 15:30:19)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
client/bin/gbr
r611bd26 rc5a98db 31 31 } 32 32 33 my @args = ("CUPS_SERVER=$host", "lp", "-d$queue", "$file"); 34 exec (@args) or die "Couldn't execute lp command"; 33 $ENV{CUPS_SERVER}="$host"; 34 35 if ($file =~ m|http://www\.youtube\.com/watch\?v=|) { 36 open(LP, "|-", "lp", "-d$queue"); 37 print LP "$file"; 38 close LP; 39 } 40 else { 41 my @args = ("lp", "-d$queue", "$file"); 42 exec (@args) or die "Couldn't execute lp command"; 43 }
Note: See TracChangeset
for help on using the changeset viewer.