Select Code to Download

for ( @array ) {
    if ( exists $hash{$_} ) {
...
        # do something else
    }
}

@array = sort @array;
foreach ( keys %hash ) {
...
       # do something else
    }
}