Select Code to Download

for my $p9 ( grep { $is_available{$_} } keys %is_available ) {

for my $p9 ( keys %is_available ) {
    next if ! $is_available( $p9 };