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>