Select Code to Download

sub get_latest_avg {
  my $host = shift;
...
  return $avg;
                                                                      
+          
}

for my $host(keys %nodes) {
  for my $rrd(keys %rrd) {
...
    print $avg. "\n";
  }
}