do {
    @data = check_file($filename, $numlines);
    sleep 5;
} while ( grep not /$process/, @data );