<%args> $sth % foreach my $field (@{ $sth->{NAME} }) { % my @row; % while (@row=$sth->fetchrow_array) { % foreach my $cell (@row) { % } % }

<% $field |h %> % }
<% $cell |h %>