sub get_latest_avg {
  my $host = shift;
  my $rrd = shift;
  my $type = shift;
                                                                                
  my $snmp = Net::SNMP->session(
                -hostname       => $host,
                -version        => '1',
                -community      => $nodes{$host}->{community}, );
                                                                                
  my $num = $snmp->get_request( -varbindlist =>   [$rrd{$rrd}{$type}] )                                                                                ;
                                                                                
  my $avg = $num->{$rrd{$rrd}{$type}};
                                                                                
  $snmp->close;
                                                                                
  return $avg;
                                                                                
}