for my $fh (@all_handles) {
   ...;  # do something with $fh
}