Beefy Boxes and Bandwidth Generously Provided by pair Networks
There's more than one way to do things
 
PerlMonks  

review a show

by teamster_jr (Curate)
on Oct 27, 2006 at 09:02 UTC ( #580880=CUFP: print w/ replies, xml ) Need Help??

It's been a very long time since i posted - my new job allows me significantly less obfu time :).
Here's a quick something:

My friends and I are off to see a kung fu demonstration by a bunch of shaolin monks on sunday. One of my friends can't make it and said:

"I can't do this weekend, so I expect a 1000-word review first thing on Monday." So I knocked this up:

@d = map { rand > .9 ? "kick" : rand > .8 ? "jump" : "punch" } 0 .. 10 +00; for ( "<b>leap through burning hoop</b>", "<b>lie on bed of spikes</b>", "<b>smash block over head</b>" ) { @a = split / /; splice( @d, rand($#d), 1 + $#a, @a ); } open(FH, ">kung_fu_review.html"); print FH "<html><body>@d</body></html>"; close(FH);
an instant (not entirely serious :)) 1000 word review (in the file kung_fu_review.html) of what i'm sure will be an amazing spectacle (if they keep to my script).
Alex

Update: it seems my review was spot on :)

Comment on review a show
Download Code
Re: review a show
by merlyn (Sage) on Oct 27, 2006 at 09:35 UTC

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: CUFP [id://580880]
Approved by Corion
help
Chatterbox?
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others rifling through the Monastery: (7)
As of 2014-12-28 04:08 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    Is guessing a good strategy for surviving in the IT business?





    Results (178 votes), past polls