Select Code to Download

use strict;
use warnings;
...

close $temp_ifh;
close $result_ofh;

next if defined first { exists $drop_words{$_} } split /\s+/;