Help for this page

Select Code to Download


  1. or download this
    perl -pe 's/cat/++$i/ge' file
  2. or download this
    perl -pe 'BEGIN { $/ = "cat" } chomp; $_ .= $. unless eof' file
  3. or download this
    perl -pe 'BEGIN { $/ = "cat" } s{$/}{$.}' file