Select Code to Download

sub mkdir_if_needed
{
...
       warn "Could not mkdir: $!\n";
    return;
}

foreach my $dacdir ( @allDACDirs )
{
...
    foreach $entry (@{$dacdir})

    ...