Select Code to Download

my @temp;
for my $h (@hosts) {
...
    }
}
@hosts = @temp;

my @temp;
for my $h (@hosts) {
...
    }
}
@hosts = @temp;

@hosts = map {
    if (/^\d{2}\z/) {
...
        $_
    }
} @hosts