[Comm] [OFF] Perl regex

[Maksim Otstavnov]

Hello Alexey,

Monday, March 22, 2004, 6:13:39 PM, you wrote:


AM> Igor Homyakov wrote:
>> это классика !
>> 
>> ^([01]?\d\d?|2[0-4]\d|25[0-5])\.([01]?\d\d?|2[0-4]\d|25[0-5])\.
>> ([01]?\d\d?|2[0-4]\d|25[0-5])\.([01]?\d\d?|2[0-4]\d|25[0-5])$
>> 
AM> Уважаемый - это разве короче?

Зато правильно, в отличие от приведенных вариантов. В смысле, вытащит
только валидные адреса.

-- 
Best regards,
 Maksim