next if ($line !~ /logging\sto\sDevice\s(.*?)\s+/i) and !eof(inFile); #### next if ! ($line =~ /logging\sto\sDevice\s(.*?)\s+/i) and ! eof inFile;