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>