03.07.2007, 02:47
|
|
Banned
Регистрация: 22.08.2006
Сообщений: 608
С нами:
10378404
Репутация:
1095
|
|
>> те которые вообще не берет я еще не видел
Код:
#!/usr/bin/perl
use strict;
$.=$ ^F,$;=$./$ .,$_=$.<<$ .*$.+$;,$ ==$.<<$.,$ *=$=+$.=>$ %=$.*$_;$ "=$%-$*
,$-=$ =-$.=>$?=$ %-$.,$:=$;+$ .;$!=$_/$.,$ @=$"-$=-$ --$:,$/=$?+$;-$*-$:,$#=
pack'c*',$_+$ *,$?+$ ;-$*,$?+$ ;-$*-$.,$ "-$.,$!,$_+$ !+$./$.,$"-$=,$"-$=+$.
/$ .,$ "-$.,$" -$=-$-,$ @,$/,$ !,$_+$ *+$ *-$.*$ .,$@,$/,$ "-$=-$.,$ !,$"-$=
-$- ,$_+$!+$ ;,$_+$!+$;+$ . ,$?+$ . /$.-$*-$ * ,$@,$/,$ !+$ *+$ . ;print $;;
>> гыггы маньяк
Код:
eval('.'.'-@^*'.'`^^@*`'.'@>^@>0^^`'.'^`'.'`[-*`>^@*I:-`->|,pI>#@-||`^^^_'^'^_)'.'0^@|0/'.'^@-_0)'.'_[pp@w@*'.'.'.'^^@_'.'0/^!__@}{'.'.'.'`]!_[/_]]'.'@dw|d')
|
|
|