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