print $averages{average1}->[0], "\n";
print $averages{average2}->[1], "\n";