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]

Reply via email to