foreach my $aref (@aoa) {
   printf("%-24s %7d %7d %f\n", @$aref);
}