Select Code to Download

while (<FILE1>) {
  $var = GetVar($_);
...
if ($var eq undef) {
  die "File provided doesn't include var!\n";
}

if      ($var eq undef) {
  ...
...
} elsif ($var eq 'foo') {
  ...
};