while () { if (/^SQL/ .. /^$/) { print "Found error $_\n"; }; };