Help for this page

Select Code to Download


  1. or download this
    qwurx [shmem] ~ > echo foo > foo; echo bar >> foo;
    qwurx [shmem] ~ > perl -ple 'BEGIN { close ARGV } print' foo
    foo
    bar
    
  2. or download this
    perl -ple 'BEGIN{close ARGV; binmode ARGV} s/foo/bar'