while (<FILE>) {
        (
        print $_ if (/Run as/ .. /^ /);

        }