Beefy Boxes and Bandwidth Generously Provided by pair Networks
The stupid question is the question not asked
 
PerlMonks  

Re: Re: Re: (Golf) ranging on alphabet

by flgr (Sexton)
on Sep 27, 2001 at 17:17 UTC ( [id://115081]=note: print w/replies, xml ) Need Help??


in reply to Re: Re: (Golf) ranging on alphabet
in thread (Golf) ranging on alphabet

This one is 127 chars. I hope it still works - if not correct me. :)
#23456789012345678901234567890123456789012345678 $b=join'',@_={+pop};$a={map{$_[$_],$_[$_+1]}0.. @_-2};$_=join',',grep$b=~s/\Q$_//g,@_;s/(.)(?:,( (??{"\Q$$a{$+}"})))+/$1..$+/g;$_


$§=lc(sub{}^" \6 \n");$§=~s/\(.*\)//;for(split
('',$§)){$/=$_;for(5..7){$/++}$:.=$/}print$:;1

Replies are listed 'Best First'.
Re(4): (Golf) ranging on alphabet
by suaveant (Parson) on Sep 27, 2001 at 17:45 UTC
    Sorry... when I ran this against the test I got back a hashref... The other 2 seem to work, though...

                    - Ant
                    - Some of my best work - Fish Dinner

Log In?
Username:
Password:

What's my password?
Create A New User
Domain Nodelet?
Node Status?
node history
Node Type: note [id://115081]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this?Last hourOther CB clients
Other Users?
Others contemplating the Monastery: (7)
As of 2024-04-18 14:49 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    No recent polls found