591:
592:        foreach my $fh (values %{$self->{_handles}}) {
593:            # Avoid creating a permanent empty hash ref for "$fh"
594:            # by attempting to access its {object} element
595:            # if it has already been closed.
596:            next unless exists $self->{_fhs}{$fh};
597: