Select Code to Download

#!/usr/bin/perl
use strict;
...
print Dumper \@total_query_to_aoh;                            # UPDATE

$dbh->disconnect;