while ( $line = <Stream> ) { if ( $line =~ m/blah/ ){ print "here\n"; } } [download]
In reply to Re: Regexing an input stream... by nekron99_ in thread Regexing an input stream... by sergio