Re^2: splitting the scalar variables in an array

[sunil9009]

Thanks for the help, I modified the code but that didnt helped either. The scalar value for @dd returned by the code is as follows 1 1 4 Thats because Hostclass-A has 1 host, Hostclass B has 1 and C has 4 hosts. I want scalar(@dd) to be just 6 ( each host should be a separate element in an array )

sub gethosts {

foreach $class(@hostclass) {
chomp (@hosts_per_hostclass = `/opt/systems/bin/expand-hostclass --hos
+ts -r $class`) ;
my @dd;
push @dd, split "\n", $_ for @hosts_per_hostclass;
print scalar(@dd) , "\n";

}
}

[sunil9009]

Consider this resolved, foreach was printing it 3 times. Final working code is as follows. Thanks to all of you guys fo the pointers.

sub gethosts {

foreach $class(@hostclass) {

chomp (@hosts_per_hostclass = `/opt/systems/bin/expand-hostclass --hos
+ts -r $class`) ;
#print "@hosts_per_hostclass \n";
push @dd, split "\n", $_ for @hosts_per_hostclass;
}
return @dd;
}