Help for this page

Select Code to Download


  1. or download this
    qw(lpr -S SYSTEMX -P QGPL/SPYVIEW -o l $file)
  2. or download this
    (split(' ', 'lpr -S SYSTEMX -P QGPL/SPYVIEW -o l $file'))
  3. or download this
    my @options = (
   -S => 'SYSTEMX',
...
$file =~ s{^(?=-)}{./};

system(lpr => @options, $file)