Help for this page

Select Code to Download


  1. or download this
    ls testfile | perl -lpi -e 's/e/*/'
  2. or download this
    ls testfile | xargs perl -lpi -e 's/e/*/'
  3. or download this
    find ... -print | perl -pi.bak -e 'BEGIN { chomp(@ARGV = <STDIN>) } s/foo/bar/g'
  4. or download this
    LINE: while (<>) {
      ...
    }
    
  5. or download this
    LINE: while (@ARGV) {
      ...
    }