ipv6 subroutines

git-svn-id: https://svn.code.sf.net/p/xcat/code/xcat-core/trunk@6018 8638fb3e-16cb-4fca-ae20-7b5d299a9bcd
This commit is contained in:
ligc 2010-05-07 09:58:36 +00:00
parent 4915e69508
commit f03ec5319e

View File

@ -20,6 +20,7 @@ use File::Basename;
use xCAT::NodeRange;
use xCAT::Schema;
use xCAT::Utils;
use xCAT::NetworkUtils;
use xCAT::InstUtils;
use xCAT::DBobjUtils;
use XML::Simple;
@ -5105,7 +5106,7 @@ sub prenimnodeset
# - if not then exit
foreach my $n (@nodelist)
{
my $packed_ip = gethostbyname($n);
my $packed_ip = xCAT::NetworkUtils->getipaddr($n);
if (!$packed_ip)
{
my $rsp;