On 1/30/06, Keith Worthington <[EMAIL PROTECTED]> wrote:
snip
> > This may motivate me to hack on that module to add -unsigned and
> > -negative options.
>
> Obviously that would benefit someone in my situation that really doesn't want 
> to
> allow negative numbers.  I think that hacking a module is well beyound me for
> the next couple of months though. ;-)
>
> Thanks for all the help.  With the exception of that one delimiter issue my 
> code
> looks pretty good.  Functionality is okay as well.  I am going to take what 
> you
> have taught me and rewrite my script during the next phase of my project.
>
> Kind Regards,
> Keith
>

After a bit of digging I have realized why the unsigned option isn't
there: the pattern is too simple to be needed.  Instead of using
$RE{num}{int} use qr{[1-9][0-9]*} or qr{[0-9]+} (depending on whether
or not you want to forbid leading zeros respectively).

--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
<http://learn.perl.org/> <http://learn.perl.org/first-response>


Reply via email to