Beefy Boxes and Bandwidth Generously Provided by pair Networks
Perl: the Markov chain saw

Re: index using a range

by farang (Chaplain)
on Jun 14, 2013 at 06:22 UTC ( #1038896=note: print w/ replies, xml ) Need Help??

in reply to index using a range

Assuming the string is only numerals and isn't all zeros (which could be checked for separately), here's a method that uses coercion of a string into a number.

use strict; use warnings; for my $Str1 ( "987654", "087654", "007654", "000654", "000054", "0000 +04" ) { my $Index = length($Str1) - length($Str1 + 0) + 1; print "$Str1 pos=$Index\n"; } __END__ 987654 pos=1 087654 pos=2 007654 pos=3 000654 pos=4 000054 pos=5 000004 pos=6

Comment on Re: index using a range
Download Code

Log In?

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

How do I use this? | Other CB clients
Other Users?
Others exploiting the Monastery: (5)
As of 2015-11-28 15:38 GMT
Find Nodes?
    Voting Booth?

    What would be the most significant thing to happen if a rope (or wire) tied the Earth and the Moon together?

    Results (743 votes), past polls