@Ky6uk

этот вариант не стал более трудным для восприятия,
но речь шла о том, что «ограничения позволяют качественнее управлять написанием подпрограмм и методов.», и соответственно для примера и простоты восприятия продемонстрировали маленькую подпрограмму.

Ваш вариант стал не короче, а более трудным для восприятия. Именно за такие записи многие и не любят Perl.

Зачем писать так длинно?

unless ($odd % 2)
{
return undef;
}

Можно ж короче:

return undef unless $odd % 2;