On Thu, 2 Dec 2004 17:19:00 -0500, Dave Gray <[EMAIL PROTECTED]> wrote: > > Is there a more compatible way to check my overly-long string? > > How about: > > die "syntax error\n" if $msgs =~ /[^\d,]/;
Oh, I missed a requirement... after the above code: while ($msgs =~ /(\d+)/g) { die "syntax error\n" if $1 > 1000000; } -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED] <http://learn.perl.org/> <http://learn.perl.org/first-response>