[perl] die для подпрограммы

Аналога "return -1;" в perl нет?

Знал бы - не спрашивал бы.

Опиши подробенее что ты понимаешь под "подпрограммой" функцию или потомка?

Функцию в данном случае.

Ну тогда return, как уже сказали выше. Если же нужно что-то вроде исключения, то можно использовать die, а ловить через eval. Подробности в мане.

exit 1; ?

>exit 1; ?

при использовании exit главная программа считает что функция завершилась верно...