Select Code to Download

open(INPUT1, "file1");

...
        }
}
close(INPUT1);

my ($havar1, $havar2);
open(INPUT1, "file1");
...
        }
}