$success = 0; open(FILE,"dumptape.log") or die ("Could not open file"); while() { if (/Dump phase number 3/) { while () { readline(); print; ; } # print; $success = 1; last; } } if(!$success) { print "Failed dump log\n"; #do other failed dump log stuff here } close FILE;