$ perl -MO=Deparse -e 'next last;'
next (last);
-e syntax OK