$ perl -le 'print prototype("CORE::open")'
*;$@