Select Code to Download

while (my $line_holder = <FILE>) {
  foreach etc...

while(<FILE>){
    my $line_holder = $_; #GOTCHA
    foreach my $val(@lines){