% if ( ref $order ) { Номер: <% $order->id %>
Пользователь: <% $order->name %>
Статус: <% exists $status_order{$order->status} ? $status_order{$order->status} : 'неизвестный' %>
Оплата: <% exists $status_payment{$order->payment} ? $status_payment{$order->payment} : 'неизвестно' %>
% if ( exists $order->{list} && ref $order->{list} eq 'ARRAY' && @{$order->{list}} ) { % my $i = 1; % foreach my $doc ( @{$order->{list}} ) { % }
# Позиция К-во Сумма
<% $i++ %> <% $doc->name %> <% $doc->number %> <% sprintf("%.2f", $doc->price * $doc->number) %>
% } Всего: <% $order->num %>
Итог: <% sprintf("%.2f", $order->sum_total) %>
% } else { % if ( grep { $_ eq 'webshop' } split /\s+/, $state->plugins ) {

Заказ с таким id в базе не найден.

% } else {

Плагин веб-магазина не подключен. Поиск параметров заказа невозможен.

% } % }
<%args> $order => undef <%init> my (%status_order, %status_payment); if ( ref $order ) { my ($statord) = grep { $_->{attr} eq 'status' } $order->structure; my ($statpay) = grep { $_->{attr} eq 'payment' } $order->structure; %status_order = map { $_->[0] => $_->[1] } @{$statord->{cases}}; %status_payment = map { $_->[0] => $_->[1] } @{$statpay->{cases}}; }