Hamish Whittal <[EMAIL PROTECTED]> wrote: : Now I want to get at the arrays inside the IP address : keys....and for the life of me, I cannot get there. I : have tried... : : foreach $key ( keys %$hostsref ) { : print ("Inserting $key into Database\n"); : @arr = @{ $hostsref{$key} };
Try: @arr = @{ $hostsref->$key} }; : print ("[EMAIL PROTECTED]"); : ($dnsName, $comm, $sysoid, $pollint, $pollYN) = @arr; : print ("\t$dnsName, $comm, $sysoid, $pollint, $pollYN\n"); : } foreach my $key ( keys %$hostsref ) { print "Inserting $key into Database\n\t"; print join ', ', @{ $hostsref->{$key} }; print "\n"; } HTH, Charles K. Clarkson -- Head Bottle Washer, Clarkson Energy Homes, Inc. Mobile Home Specialists 254 968-8328 Use strict and warnings: http://www.perlmonks.com/index.pl?node_id=111088 -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]