История изменений
Исправление lucentcode, (текущая версия) :
Я в Perl не в зуб ногой, но судя по написанному, присвоить по нормальному(в стиле PHP) можно только используя длинющую строку с тернарными операторами, или разлапистый код с if-else, или case. Будет не красиво. Чем вас существующий код не устраивает? Ускоренные логические операторы - очень няшное решение. Было бы такое в PHP, я бы от радости прыгал до потолка.
Исходная версия lucentcode, :
Я в Perl не в зуб ногой, но судя по написанному, присвоить по нормальному(в стиле PHP) можно только используя длинющую строку с тернарными операторами, или разлапистый код с if-elst, или case. Будет не красиво. Чем вас существующий код не устраивает? Ускоренные логические операторы - очень няшное решение. Было бы такое в PHP, я бы от радости прыгал до потолка.