need an outstanding IP regular expression

[tuananh87vn]

\b(25[0-5]|2[0-4][0-9]|[01]?[0-9][0-9]?)\.(25[0-5]|2[0-4][0-9]|[01]?[0-9][0-9]?)\.(25[0-5]|2[0-4][0-9]|[01]?[0-9][0-9]?)\.(25[0-5]|2[0-4][0-9]|[01]?[0-9][0-9]?)\b

This ip validator matches most of IP addresses I tried, however it also considers 09.09.15.59 as an IP inside 20si10298798agb .38.2008.09.09.15.59.18;

can anybody help me find way to match most ips but ignore the above stupid non-ip string

[eWish]

Have a look at Data::Validate: :IP at CPAN.

--Kevin