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