svn commit: r961834 - /incubator/vcl/trunk/managementnode/lib/VCL/utils.pm

[fapeeler]

Author: fapeeler
Date: Thu Jul  8 16:39:45 2010
New Revision: 961834

URL: http://svn.apache.org/viewvc?rev=961834&view=rev
Log:
VCL-346

cleaned up regex


Modified:
    incubator/vcl/trunk/managementnode/lib/VCL/utils.pm

Modified: incubator/vcl/trunk/managementnode/lib/VCL/utils.pm
URL: 
http://svn.apache.org/viewvc/incubator/vcl/trunk/managementnode/lib/VCL/utils.pm?rev=961834&r1=961833&r2=961834&view=diff
==============================================================================
--- incubator/vcl/trunk/managementnode/lib/VCL/utils.pm (original)
+++ incubator/vcl/trunk/managementnode/lib/VCL/utils.pm Thu Jul  8 16:39:45 2010
@@ -1596,7 +1596,7 @@ sub getdynamicaddress {
                my @hosts = <HOSTS>;
                close(HOSTS);
                foreach my $line (@hosts) {
-                       if ($line =~ 
/([0-9]*.[0-9]*.[0-9]*.[0-9]*)\s+($node)(\s\.)/) {
+                       if ($line =~ 
/(\d{1,3}\.\d{1,3}\.\d{1,3}\.\d{1,3})\s+($node)/) {
                                $privateIP = $1;
                                notify($ERRORS{'OK'}, 0, "PrivateIP address for 
$node collected $privateIP");
                                last;