Select Code to Download

#!/usr/local/bin/perl -w
...
         
        1;

test.txt

...
hello
hey
there

list.txt

...
way 
to 
go