% my ( $html, $hashref ) = $svc_x->export_getstatus;
% if ( keys %$hashref ) {
Status settings
<% ntable('#cccccc',2) %>
% foreach my $key ( sort {$a cmp $b} keys %$hashref ) {
<% $key |h %> |
% if ( ref($hashref->{$key}) eq 'ARRAY' ) {
% foreach (@{ $hashref->{$key} }) {
<% $_ |h %>
% }
% } else {
<% $hashref->{$key} |h %>
% }
|
% }
% }
<%init>
my $svc_x = shift;
%init>