my $file;
open $file, ...