Beefy Boxes and Bandwidth Generously Provided by pair Networks
Perl Monk, Perl Meditation
 
PerlMonks  

Re: Re: PGA Golf, Round 1

by danger (Priest)
on May 24, 2001 at 19:26 UTC ( #82953=note: print w/replies, xml ) Need Help??


in reply to Re: PGA Golf, Round 1
in thread PGA Golf, Round 1

According to the counting rules (rule 1 above) you only count the characters inside the subroutine block (for one liners you count the whole command line). So yours is 18 chars.

Not to spoil anyone's fun, but here's a small tip for shaving characters --- use pop rather than $_[0], that gives us a 16 character solution:

sub S {(pop=~/\w+/g)[4]} 123456789_123456 # 16

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://82953]
help
Chatterbox?
[Lady_Aleena]: I'm glad I've sort of learned command line grep so I can find where and how I've used this sub.
[Lady_Aleena]: Having to rewrite some parts of my site for mobile devices is such a pain in the butt.
[shmem]: Lady_Aleena: what editor are you using, on what platform?

How do I use this? | Other CB clients
Other Users?
Others scrutinizing the Monastery: (4)
As of 2017-04-27 11:58 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?
    I'm a fool:











    Results (505 votes). Check out past polls.