$ perl -Mv5.40 -e'say prototype "CORE::$ARGV[0]" // "[undef]"' shift
;\@

$ perl -Mv5.40 -e'say prototype "CORE::$ARGV[0]" // "[undef]"' print
[undef]

$ perl -Mv5.40 -e'say prototype "CORE::$ARGV[0]" // "[undef]"' try
[undef]