Perl встроен в выход и печать одной командой

Я знаю, что могу умереть, но это выводит имя сценария и номер строки.

Мне нравится делать такие вещи, как die 'error' if $ problem;

Есть ли способ сделать это, не печатая номера строк?

Было бы неплохо не использовать фигурные скобки if ($ проблема) {print 'error'; exit}