Select Code to Download

[PASSWORDS]
GUY    ddd
GIRL   dfd33
BOY    df341

my @listOfPass;
open(INPUT , "<$input_file" ) or die "couldn't open";
...

                }#end while loop
close (INPUT);