#!/usr/local/bin/perl5

while (<>) {
  /Mflop\/s in \d+\.\d+ secs/ && print;
}

.