my $fh; open($fh, ...);