PERL последний день месяца

Обязательно именно на perl? А то...

$ date -d "01 feb 1994 + 1 month yesterday"
Пнд Фев 28 00:00:00 YEKT 1994

да обязательно.... понимаю что с date проще, но надо на perl

cpan> i /Date::Calc/

perl -MTime::Local -MPOSIX=ctime -e 'print ctime(timelocal(0,0,0,1,2,94)-86400)'
Mon Feb 28 00:00:00 1994

Time::Local и POSIX идут в стандартной поставке

http://www.opennet.ru/tips/info/1829.shtml там в каментах можно посмотреть.

не по теме, но мне понравилось:

bash$ cal | xargs | awk '{print $NF}'