Help for this page
local *ARGV = [$path];
perl -wlE 'sub say_argv { say @ARGV, $ARGV; }; $ARGV=9; say_argv; do { + local *ARGV = ["foo"]; say_argv; }; say_argv' 1 2 3 1239 foo9 1239