Выбор заказов по статусу

% foreach my $case ( @cases ) { % next unless $case->[0]; % my $style = $status && $case->[0] == $status ? 'inverted' : ''; % }

ID	Статус
<% $case->[0] %>	<% Encode::encode('utf-8', ucfirst(Encode::decode('utf-8',$case->[1]))) %>

<%args> $status => undef <%init> my ($prop) = grep { $_->{attr} eq 'status' } webshop::Order->new( $keeper->{webshop} )->structure; my @cases = @{$prop->{cases}};