if /$pattern/{
  print "$$i\n";
  $i++;
}