Select Code to Download

$ cat file.txt
ASDF_ONE {
...
    tmp
    magic
}

#!/usr/bin/perl
use warnings;
...
else {
    print "TWO does not have the word.\n";
    }

$ perl 11129184.pl
ONE already has the word.
TWO already has the word.