Select Code to Download

       #my ($key, $value) = split /\s*=\s*/, $line;
       if( $line =~ /^\s*([^=]+)=(.*?)\s*$/ ) {
...
       } else {
           croak "Malformed environment line: '$line'";
       };