while( <FH> ) {
  print "$.:$_";
}

##</code><code>##

  print $. + 1, ":$_";