Beefy Boxes and Bandwidth Generously Provided by pair Networks
Do you know where your variables are?
 
PerlMonks  

Re^2: What's the answer to this puzzle? Most unique/golfed solution? (fun)

by liverpole (Monsignor)
on Sep 23, 2011 at 14:42 UTC ( #927574=note: print w/replies, xml ) Need Help??


in reply to Re: What's the answer to this puzzle? Most unique/golfed solution? (fun)
in thread What's the answer to this puzzle? Most unique/golfed solution? (fun)

thundergnat,

This just trims a few characters from your approach, which I think is a very good one (I couldn't find an inherently better one).

# 68 strokes perl -E'map{say$_=$t||1;$t="";$t.=(length$&).$1while/(.)\1*/g}0..19'

s''(q.S:$/9=(T1';s;(..)(..);$..=substr+crypt($1,$2),2,3;eg;print$..$/
  • Comment on Re^2: What's the answer to this puzzle? Most unique/golfed solution? (fun)
  • Download Code

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://927574]
help
Chatterbox?
[ambrus]: Corion: as for that, I talked with schmorp, and looked a bit more at Prima
[ambrus]: Corion: from the docs, it definitely looks like it would be possible to write an AnyEvent driver for it using Prima::File and Prima::Timer.
[ambrus]: (I haven't found an idle event.)
[ambrus]: However, I also looked at the internals, and found two interesting things:
[marto]: stupid xpath question, I have a xpath copied from the browser, is the * wildcard supposed to work for IDs? e.g. '//*[@id="*"]/ div/div/header/p/a '?

How do I use this? | Other CB clients
Other Users?
Others rifling through the Monastery: (8)
As of 2016-12-08 10:46 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?
    On a regular basis, I'm most likely to spy upon:













    Results (140 votes). Check out past polls.