Select Code to Download

use strict;
use warnings;
...
  $delete_words{$_}++;
}
close($fh);

if (exists($delete_words{$_})) {
  # do nothing
...
else {
  # write to file C
}