Help for this page

Select Code to Download


  1. or download this
        perl -ne 'print if $prev; $prev = /energy/' file

    # Or with a counter

    perl -ne 'print ++$i, $_ if $prev; $prev = /energy/' file
  2. or download this
        perl -ne 'print ++$i . <> if /energy/' filename