Beefy Boxes and Bandwidth Generously Provided by pair Networks
Clear questions and runnable code
get the best and fastest answer
 
PerlMonks  

Japhy New Year

by liverpole (Monsignor)
on Jan 01, 2006 at 04:07 UTC ( [id://520207]=obfuscated: print w/replies, xml ) Need Help??

Try running this first without arguments (or with an argument of '0').  Then try it with a numeric argument of '1' or '2'.   (Update: The values '2005' and '2006' also work in place of '1' and '2').

Happy New Year to all at Perlmonks!

#!/usr/bin/perl -w $_=q/ `````````````````````````````````````````````````````````````````````` +````` ````````````````````''````''``xp(EM((x<``''``````````````````````````` +````` ```````` ''`.... '````''pMMMMMMMMMME<''``````````````````````````` +````` ````````' '~>pxaaao~````~FMME(xxMMMMMMM{~```''``''''''''~><<<``````` +````` `````````..=p(pppqqqb{b>'oWWW{>'~(MWWWWWWWW~'''''`'''''~b{F{((EE(x```` +````` ```````'' cqbbbbpqqqbbbbFWWWo'~bWMMMMMMMWWM(``''``''`;(((({{((((((E<`` +````` ```````''qqqbbo>;=adbbppMMW{`<EMMMMMMMMMWWMMx`''``''xE((pp>>((((((((p; +````` ````````xdddx;`;<addppp(###daEMMM######WWMMMG. ..'b())d..'>))(((((((p +````` ```````;(dda.=addqqqbbb}WW@@@@W####MM##@WM###|>>!!|F(()a!x{{)((((((((E +<```` ```````xbqqc~bbppqqqbbb{WWW@@@WM###MMM@@#MM#@c';;=c}{{}}}{{{)((((((((( +(```` ```````(bqqqbbbppqqdppp{W####@WM###MMM@@#MW@@ ```=::x(())){}(((((((((( +E;``` ```````(pdddpppppqqdppp}@MM##@WM###MMW@##MM@@.```.==;<()))()(((((((((( +Ex``` ```````(bqqqbbbppqqqbbqqHWW@@@WM###MWW##WWW@c:~~~::~~~>F}))((((((((((( +Ex``` ```````pbqqqbbbppqqqbbqq}WW@@@WM###@W##MWWMG=.=`..;;;;;b}))((((((((((( +E```` ```````<)ddddpppdddddppqq)#M###M######MMWWE=.....;`;;`;~}))((((((((((( +(```` ````````(pppppppbbbbbbbbbb{WWWWW@##MMMMMWF>: ''''~''~~~{)(((((((((((( +<```` ````````~{bbbbbpbbbbbbbbbb{>FWWW@##MMMMEb~;=..````;```;~b)(((((((((((p +````` ````````'~(ppbbppppppppbb(<pE(EE###E(px;~~;=..```````=;~q((((((((((Ep` +````` ````````''`x(bbpppppppp{o;(p;~{E###(;`;;~'': ''''''~ ::}((((((((((x`` +````` ````````''```>b((bb{{bo~'{b'~bFH###G=;;`''......``;;`==qF((((((E(x```` +````` ````````''```''`;o{F''''{{~~{FFFFEEEp;`;'~`````;`````;<b~<E((xx;`````` +````` ````````''```''``(p(p``~F(x(EEEEEEEEEx;;~'~''''~''~'~~b''xE((````````` +````` ````````''```''``p(px``>FEEEEEFFEEEEEEx;~';;'~``;;;~~>```(EE(````````` +````` ````````'''''' . '>''''{HHHFFFFFFEEEEEE(<`;~~~';;;;x;''''`;<`````````` +````` ````````''```''. '>'''oFHFFFFFFFFEEEEEEE{bo>~;<xx;````''''p`````````` +````` ```````````````....(```<EGEEEEEEEEEEEEEFFFFEEpx<`````````''b`````````` +````` ```````````````....a````EGEEEEEEEEEEEFFFFEEE(x<(;`````````'~o````````` +````` ```````````````.`..=!```pGEEEEEEEEEEFFEEEEEEpp(x```````````'{'```````` +````` `````````````'' ``..d;``<)EEEFHGGGGEEGGGGGEp..p;...`````````x````````` +````` `````````````''.```.=a`<<.pEFHHFEGGGEEGGGFF`..`p`.``````````p;```````` +````` `````````````''.``''.!c>' 'oHHHFFGGGEEGGGb'....x`.``````````p;```````` +````` ````````''''''' '''' !q ' '':qHHHGGGEEEd: `....;!````````'``<;```````` +````` ``````````'````.````;a q..``...;(EEpx<`. '' q''''''''''`;<```````` +````` ``````````''```.`'''x; :a.``...EEEx```` '' >>'''''''''';x```````` +````` ```````````''``.`''`x`' =a```..!(p;.```' .````. 'b``````````;p```````` +````` ```````````''`.. '`x;`''..p```.d...```''..````. 'o;`````````;x```````` +````` ```````````''```''`p``''```p```>'`````''```````''~x`````````x;```````` +````` ````````'''''''''''o'`''''''b~o'''```''````````'''x``````'``p````````` +````` ````````'''''''''''o'`'''''''oo'''``''`````````'''E`````'''(`````````` +````` `````````````''````x``''````'>x;```''```''''''''''F''''''~o'`````````` +````` `````````````''..``p;`''.```'>`x;``'````''`````'''x`..`;p;```````````` +````` ````````''''' '>~`' ````'b``x```````''`````''~<..!<<`````````````` +````` ````````''''''' ''`' ````~>```p``````''`````''ox!!.```````````````` +````` `````````````''`...``` '````~~```;x`````''`````>ob`...`````'`````````` +````` ````````````'''' ..`` '````~~````<;````''```<x'b~`...````'''````````` +````` ```````````''''`` `.''``..:|.```;) ''''|:' |''' '''''''''```````` +````` ``````````'''''``. . '``..`'q..``.<<....`.a=..| '``.````````````````` +````` ``````````''`''```. .''`...`'c..````p`...``=..p' '``.````````````````` +````` `````````''``''```.. '``.... c..````d....``..!;'''``.````````````````` +````` ````````''```''```. '``...`'o````..x`...``.=a`'''```````````````````` +````` ```````'`````''``` ```...`'o;``...;`...``.a.`'''`...```````````````` +````` `````````````''``' .````...''p.`...``...``a..`'''`...```````````````` +````` `````````````''`` ...````.. )```....`....=...'''`...```````````````` +````` ````````````````````````````''x```````````<````'''```````````````````` +````` ``````````````````````````````p;``````````;````'''```````````````````` +````` /;$;=(shift||0)%3;$,=q/@H}qc|: /.(0,q/#G)da!=./,q/WF{bo>~'/)[$;];$;&&s /[$,]/@/gm;$;&&s/[^\n@]/ /gm;print

@ARGV=split//,"/:L"; map{print substr crypt($_,ord pop),2,3}qw"PerlyouC READPIPE provides"

Replies are listed 'Best First'.
Re: Japhy New Year
by McDarren (Abbot) on Jan 01, 2006 at 09:26 UTC
    very, very nice :)

    I checked with my wife (a native chinese), and she tells me that the characters are "old-style" chinese, usually referred to as Traditional Chinese (as opposed to Simplified, which is more commonly used). Although I think I saw you mention something in the CB about them being Japanese. I think Japanese and Traditional Chinese characters are very similar.

Re: Japhy New Year
by japhy (Canon) on Jan 02, 2006 at 05:31 UTC
Re: Japhy New Year
by liverpole (Monsignor) on Jan 01, 2006 at 23:48 UTC
    It's not exactly a "spoiler" in the usual sense, but for anyone interested, here is the program I used to generate the obfuscation.

    @ARGV=split//,"/:L"; map{print substr crypt($_,ord pop),2,3}qw"PerlyouC READPIPE provides"
Re: Japhy New Year
by cLive ;-) (Prior) on Jan 01, 2006 at 23:08 UTC

    Errr, on my fedora box with Perl 5.8.5, I just get everything up to the p; line printed. Am I missing something?

    cLive ;-)

    edit: yes I am - I didn't read the instructions. D'oh.

      That's normal if you don't give a numeric argument. It's supposed to look like balloons. Also try giving a numeric argument of "1" or "2".

Log In?
Username:
Password:

What's my password?
Create A New User
Domain Nodelet?
Node Status?
node history
Node Type: obfuscated [id://520207]
Approved by fishbot_v2
Front-paged by McDarren
help
Chatterbox?
and the web crawler heard nothing...

How do I use this?Last hourOther CB clients
Other Users?
Others meditating upon the Monastery: (5)
As of 2024-03-29 07:38 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    No recent polls found