tucano: Good Luck
Tucano is my animal.
This tucano give you five number from 1 to 90 that you can play! here is the code:
Thanks to: Crakers2 (node 228902).
see also node 362406 (practicing obfuscation code) Updateted 2004-07-05
#!/usr/bin/perl
use strict;
$_='AAAAMZZZZZMMAAAAAA
AAZZZZZZZZZZZZZZZZZZZZZZZZZZAMAA
AANNMZZZZZ@ZZZZZZZZZZZZZZZZZZZZZZZZZZXZWWAZ_
AMMNMMMN=ZZZZZZZZZZZZZZZZZZZZZZ1ZZZZZZZMMNNMNMNAA.
AMNMMAZMNZAZZZZZZZZZAZAAXXXXXXXAAAAZZZMMMMMMMMNMMNZ. AZ
9AMN0AZAAZMMAAAAZZZZAA;XXZZZZZZZVVVZZWWVWWWMMNMMMMMMMMZ AMXVZ
AZNNNNZMMNMZMMZAMMAAXZZZZZZZXZXXWWWWWWWWWpWWWHMMMNMNMMMN AMZAMUWW
AMMMNMZZMUUUMWZZZMMXZXAXXZZZZZZZXkXkkkXXXXXMZMZAHHHHHMMMMA AZAMZ HAXH
ANNMMZ ZNZMkZXZZZZZZZZZZrZZkkXHHHHYMMZZ ZZMZ MIZZ MAikV
ZMMMM MMNNMNXXZZZZVZZZZWYYMM AAZZAMZM ZXWXZ
ZZMZ AZMHMMNMkZAZZM AXXXZMAZAZMZXW
MHM MZWXMAAAInZZAWk
ZMHX AXHkXHXAAZAIZZXZk
WMNA ZAMAA AZMZXWUAAZAMAtAZWkW
AMML ZMZZHNAAAA AMVXZHXAXIZMAZAAZWX
MNMZ ZMMZZHMMMNHMAA AZZZXWAZAXXZZZZWHHWZ
MMNA AZNMNMMMNNNNZNMNMA AZZZZAHZAAZAXXkWZZZXWV
UMM AMZNMMMMNNNMMMZZZMZNZ AHWZHZHXkXAXZWUWHkHZWWW
UNA AZMNNMMNN(MH(HZZNZZZMNNHWkHHWHHHAAWHHVZZWWZWX
ZZA AMMMMsMMMMMMHHMMMMMMMMMHZHMHMHWZkkXWWWXWXWWWWWW
ZNA AMMNMMMMMMMMHMHHMMMMMMMMMMHkMZWWWXXHHXWWXXZUVWZWW
MNZA AAAZMNMNMMMMMpMMMZNMMNMMNMMHHMZZXWXWHXHAXWWWZXXXVZWWZ
ZMMNNMMMMNMMMMMMMNMMNMMMAMNMMNMMNMMZAXZZHHkWWWkHWVXXZZXXZWXWW
ZMMMNMMMMMMMMMMMMMMNMMMNlMMMMMMMNiXZZZMHHHWHcZXHZAWWWAWWWZWUW
MNMMNMNMMMMMMNMNMMMNMMMMMMMNMMMMHHXkHHHHHWMAAXWXWXZXWZXXWWWWZ
NMNNMMNeNNMM(NMMNMMNMM@MNMMNMMHHH_HHHZWHXX,XXXXZUWZWWZrUAZWk
ZMMMandNMMMMNMMMMM($#MMMMNMMMHHXXH_ZXkHZWXA-WXXXAXXXXVAZZWZW
ZMMMMNMMNMMMMMNMMMMMMMMMMMMMHkXWXHWHHHkZZZXZMMZZXXZXWAZZAXW
MMNMMM$MNMMM_)MMM,NMMNMMMMMHkWk1ZXZZ))WWZZMX,$/XXZXZX)ZUXf
AWNNNMMMMNMNNNMMMMMMMMMMMHHXWWkXWWWZXAXMAZZXXXWXXWHWAWXWW
MWMMMMMMMMorNNMMMM+MMHAAANAXZ1XWWZ.XZAXXZA.WZkXWZWWX5W;
ZZMNMMMMMMMMMNMMMHHHMHHHWWHZVWWWkkWkZXWkHWXAZXWWWZZM';
$a='?$?_?=?~?s?/????????[?A???M????N?????????????X?W?
???????????V???????UL???????Y??????Hk????IZ???\s???
????????????????????]????//??gm;$a=\$_??????????
?????;??$????a??=?????$????$????a???;???e??v?a????
????l?????????$?????????a??????;???????????????';
$a=~s/[\?\s]//gm; eval $a;
Thanks to: Crakers2 (node 228902).
see also node 362406 (practicing obfuscation code) Updateted 2004-07-05
Re: tucano: Good Luck
created: 2004-07-01 23:00:37
very, very cool!
worked great on my system running from the command line!!
one thing I noticed is in your last substitution, within the character
class, you don't need to backslash the '?' and you can remove
the \n and \t since \s matches whitespace including tabs, newlines etc
worked great on my system running from the command line!!
one thing I noticed is in your last substitution, within the character
class, you don't need to backslash the '?' and you can remove
the \n and \t since \s matches whitespace including tabs, newlines etc