Beefy Boxes and Bandwidth Generously Provided by pair Networks
Clear questions and runnable code
get the best and fastest answer
 
PerlMonks  

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

by idnopheq (Chaplain)
on Apr 05, 2001 at 22:50 UTC ( #70222=note: print w/ replies, xml ) Need Help??


in reply to (GOLF)Re: Leading Zeros w/ increment
in thread Leading Zeros w/ increment

THX, but the 'z' in the automagical increment line of wonder astounds me, but I think it's involved in the incrementation.

This does break, though, if you no not need to pad : i.e. 1 to 20.

Thoughts?
Dex


Comment on Re: (GOLF)Re: Leading Zeros w/ increment
Re: Re: (GOLF)Re: Leading Zeros w/ increment
by extremely (Priest) on Apr 05, 2001 at 23:12 UTC
    If you don't need to pad then $count++ works fine. The trick to this all is that perl's ++ is magical on some strings. Try these:
    my ($a, $b, $c, $d, $e) = ("aaa", "ab000", "123", "00123", "321ba",); $a++; $b++; $c++; $d++; $e++; print "a=$a\nb=$b\nc=$c\nd=$d\ne=$e\n"

    You'll notice when you run those that $e gets chopped to just numbers. In fact, my stunting isn't really necessary since perl will happily leave the "00" on the front of $d! The only trick to it is never treating $d as a number. Look at this:

    # now that is golfing. perl -e '$a="0035";until("$a">50){print++$a,$/}'

    Cute huh? Perl is like a squirrel's nest. Good stuff is everywhere but most of it is nuts...

    Your code could be re-updated to have quotes around "$String" in the comparison for the loop and just have $String++ where the "magical" part was. Sad that I didn't even know how slick it was. My stunt kept the comparison from blasting the string but it is better just to never treat it numerically.

    --
    $you = new YOU;
    honk() if $you->love(perl)

      I just had what my high school calculus teacher referred to as a "a-ha experience"! I was treating my script's $d exquivallent as a number, then as text!

      THX
      Dex

Log In?
Username:
Password:

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

How do I use this? | Other CB clients
Other Users?
Others scrutinizing the Monastery: (6)
As of 2014-07-14 06:55 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    When choosing user names for websites, I prefer to use:








    Results (255 votes), past polls