RE: Regular expression for an IPv4 address

[Bullock, Howard A.]

I am sure one of the experts can make these two regex lines into one, but
here it is..
$z = '001.022.003.040';
print "$z\n";
$z =~ s/^0+//;
$z =~ s/\.0+/\./g;
print "$z\n";
_______________________________________________
Perl-Win32-Users mailing list
[EMAIL PROTECTED]
http://listserv.ActiveState.com/mailman/listinfo/perl-win32-users