Melly wrote: The abs $2 is to chop off any leading 0's (00012 to 12 for example).
If you run into this frequently, you can just add zero to the string to force a numeric context and eliminate those zeroes.
perl -e '$foo="007";print "$foo\n";$foo+=0;print "$foo\n"' 007 7
Cheers,
Ovid
Join the Perlmonks Setiathome Group or just click on the the link and check out our stats.
In reply to Re: Re: Re: Odd warning
by Ovid
in thread Odd warning
by Melly
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |