$csv->print (*STDOUT, [@{$sth->{NAME_lc}}]);