Select Code to Download

use warnings;
use strict;
...
          or die "can't copy file $file to $write_dir!: $!";
    }
}