$ perl -e'print prototype "CORE::die"' @$