print join "\n", @{ $sth->{NAME_uc} }, '';