Beefy Boxes and Bandwidth Generously Provided by pair Networks
P is for Practical
 
PerlMonks  

Re: YAGG (Yet Another Golf Game)

by chipmunk (Parson)
on Feb 13, 2002 at 06:33 UTC ( [id://145095]=note: print w/replies, xml ) Need Help??


in reply to YAGG (Yet Another Golf Game)

This solution comes in at 89 characters: 
@h=0;print map(rand>.5?++$H&&++$h[-1]&&H:++$#h&&$",a..gr),$/,
join('|',grep$_,@h),$/,$H,$/

[download]
Could you clarify the exact output format that the code should produce?

Replies are listed 'Best First'.
Re: Re: YAGG (Yet Another Golf Game)
by Necos (Friar) on Feb 13, 2002 at 21:14 UTC
    Just a the number of heads that occur in a row, follwed by the number of heads total. Look at the sample output in the root node for a better example. The only real requirement in the output is that the flip data, tally, and total need to be separated by newlines.

    Theodore Charles III
    Network Administrator
    Los Angeles Senior High
    4650 W. Olympic Blvd.
    Los Angeles, CA 90019
    323-937-3210 ext. 224
    email->secon_kun@hotmail.com
[reply]

In Section Meditations

Log In?
Username:
Password:

What's my password?
Create A New User
Domain Nodelet?

www.com | www.net | www.org
Node Status?
node history
Node Type: note [id://145095]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this? • Last hour • Other CB clients
Other Users?
Others surveying the Monastery: (2)
As of 2024-04-20 04:43 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    No recent polls found