open my $fh, ...