% foreach (@field) { <% shift @label %> % }
Debugging: 




<%init>

my %param = @_;

my @label = ref($param{'label'}) ? @{$param{'label'}} : ($param{'label'});
my @field = ref($param{'field'}) ? @{$param{'field'}} : ($param{'field'});