>perl -E"say defined(prototype('CORE::say')) ?'yes':'no'" no