+
+ $m->callback(
+ CallbackName => 'EachField',
+ Record => $record,
+ Format => \@Format,
+ Column => $column,
+ Classes => \$class,
+ Align => \$attrs{align},
+ Style => \$attrs{style},
+ Colspan => \$attrs{colspan},
+ Out => \@out,
+ );
+
+ $m->out(qq{<td class="$class" });