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