while($ref = $sth->fetchrow_hashref('NAME_uc')) {
  $template->param($_ => $ref->{$_}) for keys %{$ref};    
  print $template->output;
};