Select Code to Download

use File::Slurp; # Update: or use File::Slurper which Athanasius menti
+oned.

...
}
closedir(DIR);

use strict;
use warnings;
...
        closedir $DH or die "Failed to close directory handle for '$di
+r' ($!)\n";
}