Select Code to Download

for my $file_name (
   keys %{
...
) {
    ...
}

my $hash = $hash_name eq 'dat'
   ? \%dat_mapping
...
for my $file_name (keys %$hash) {
    ...
}