Peter Rabbitson [PR], on Thursday, March 10, 2005 at 14:00 (-0500)
wrote:

PR> I think what he really wants is to throw a fit when there is a leading zero
PR> for which your solution won't cut it. Here is how I see it:

PR> $field =~ /^[1-9]\d?\.[1-9]\d?\.[1-9]\d?$/

yes, and for complexity:

$field =~ /^([1-9]\d?)\.{2}\1$/;

untested :)

-- 

 ...m8s, cu l8r, Brano.

["And don't call me `Chum'." -- Richard Sloat]



-- 
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