while(<>)
  {
      //do stuff
  }
##</code><code>##

  open FST, $ARGV[0];
  while(<FST>)
  {
      //do stuff
  }
  while(<>)
  {
      // other stuff with all files but $ARGV[0]
  }