print join( " : " , @{$sth->{NAME}}) , "\n";

while ( my @row = $sth->fetchrow_array ) {
    print join( " : " , @row ) , "\n";
}