open(FILE,"dumptape.log") or die ("Could not open file");
while(<FILE>) {
  if (/Dump phase number 3/) {
    print;
    print <FILE> for (1..3);  
    last;
  }
}
close FILE;