Select Code to Download

print grep { !/process/  } <>;

perl <script>.pl <input>.txt

ksjhfk
kfh

my @process = grep { !/process/  } <>;

{
    local undef $/;
    print split /process \s \w+ (.+?) end \s process/xms, <>;
}