Help for this page

Select Code to Download


  1. or download this
    perl -e 'while (<>) { print "XXX\n" ;print; print "XXX" }'
  2. or download this
    perl -ne 'print "XXX\n" ;print; print "XXX"'
  3. or download this
    perl -pe '$_ = "XXX\n" . $_ . "XXX"'
  4. or download this
    perl -e'...' < /tmp/file
  5. or download this
    perl -e'...' /tmp/file
  6. or download this
    perl -pe '$_ = "XXX\n" . $_ . "XXX"' /tmp/file