Select Code to Download

# FH is our example file handle
while(<FH>){
    #action on each line
}

my @file = <FH>;
foreach my $line (@file){
    # action on each line
}