perl -wle 'print prototype("CORE::map")'