if ( pattern match )
{ $wanted_line = $_; }