open F, @ARGV; #### open F, scalar(@ARGV); #### my ($mode, @cmd) = @ARGV; open F, $mode, @cmd or die ...; #### $ perl -E 'say prototype(\*CORE::open)' *;$@
## open F, scalar(@ARGV); ##
## my ($mode, @cmd) = @ARGV; open F, $mode, @cmd or die ...; ##
## $ perl -E 'say prototype(\*CORE::open)' *;$@