Select Code to Download

unless($tmp_dir eq $dir){
    print OUTPUTFILE "\n", $tmp_dir ,"\n";
    $dir = $tmp_dir;
}