Select Code to Download

my @paras = do {local $/ = "\n\n"; <FILE>};

my @wanted = grep {/^\Q$KWD:\E/} @paras;

print OUTFILE @wanted;