my $fh = \do { local *HANDLE };