Beefy Boxes and Bandwidth Generously Provided by pair Networks
laziness, impatience, and hubris
 
PerlMonks  

Re: Re: (GOLF)Re: Leading Zeros w/ increment

by extremely (Priest)
on Apr 05, 2001 at 23:12 UTC ( #70232=note: print w/ replies, xml ) Need Help??

Help for this page

Select Code to Download


  1. or download this
    my ($a, $b, $c, $d, $e) = ("aaa", "ab000", "123", "00123", "321ba",);
    $a++;
    ...
    $d++;
    $e++;
    print "a=$a\nb=$b\nc=$c\nd=$d\ne=$e\n"
    
  2. or download this
    # now that is golfing.
    perl -e '$a="0035";until("$a">50){print++$a,$/}'
    

Log In?
Username:
Password:

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

How do I use this? | Other CB clients
Other Users?
Others taking refuge in the Monastery: (7)
As of 2014-10-02 12:43 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    What is your favourite meta-syntactic variable name?














    Results (56 votes), past polls