while( <> ) {
}

##</code><code>##

  foreach $ARGV (@ARGV) {
    open( THISFILE, $ARGV ) || next;
    while( $_ = <THISFILE> ) {
    }
  }

##</code><code>##

  $ grep 'foo' thisfile.txt thisOtherFile.txt