Re: Return from a subroutine generates a negative value

You cannot order hash keys, by definition, their order is arbitrary.

What I understand by first pass means that for one key $host from %nodes, $rrd takes on the values from %rrd in thje way you expect, but it does not for the other keys in %nodes. I doubt that is what you mean ... or if it is, you are not showing the relevant coded, since %rrd is not modified in the code you present.

How about putting a print statement in the inner loop, to see what is happening?

for my $host(keys %nodes) {
  for my $rrd(keys %rrd) {
    printf "host: %s\trrd: %s\n", $host, $rrd;
#    my $avg = &get_latest_avg($host,$rrd,'free');
#    print $avg. "\n";
  }
}
[download]

--
TTTATCGGTCGTTATATAGATGTTTGCA

Comment on Re: Return from a subroutine generates a negative value Download Code

Replies are listed 'Best First'.

Re: Re: Return from a subroutine generates a negative value
by c (Hermit) on Aug 07, 2003 at 23:35 UTC

To plug in some values for the hashes I use (both are declared outside of the for loops), I'm adding this:

my %nodes = (
        'host1' => {
                'hardware' => 'servers',
                'community' => "$serverCommunity",
                },
        'host2' => {
                'hardware' => 'servers',
                'community' => "$serverCommunity",
                },
);
my %rrd = (
        'real_trend' => {
                'free' => $memAvailReal,
                'desc' => 'Physical Memory',
                },
        'swap_trend' => {
                'free' => $memAvailSwap,
                'desc' => 'Swap Memory',
                },
);
[download]

I just don't think these values matter that much since their order seems unimportant.

I somehow think the issue may be in the snmp session somehow however I have no clue as to why.

Thanks very much for your time on this -c

[reply]
[d/l]


go ahead... be a heretic
	PerlMonks