my $filehandle =$fh{$sub};
1 2 3 4 5 6 7
my $filehandle; if (exists $fh{$sub} ) { $filehandle = $fh{$sub}; } else { die "Dateihandle fuer $sub nicht gefunden!"; }