takes two-dimensional perl array and formats it in html table

DEMO:

  my @data;

  push @data, [
              '123',
              { ARGS => 'align=right', DATA => 'asd' },
              'qwe'
              ];
  push @data, {
                CLASS => 'grid',
                DATA => [
                        '123',
                        { ARGS  => 'align=center', DATA => 'asd' },
                        { CLASS => 'fmt-img',      DATA => 'qwe' },
                        ],
              };
  push @data, {
              # columns class list (CCL), used only for current row
              # use PCCL for permanent (for the rest of the rows)
              CCL  => [ 'view-name-h', 'view-value-h' ],
              DATA => [ 'name',        'value'        ],
              };
  push @data, {
              PCCL  => [ 'view-name-h', 'view-value-h' ],
              # set only PCCL and skip this row
              SKIP  => YES,
              };

  $text .= html_table( \@data, ARGS => 'width=100%' );

formats pair for left/right boxes aligned within specific width

format is: 'left-spec=right-spec'

left-spec is formatting for the left data. right-spec is formatting for the right data.

both specs are:

align-symbol . width-len%

examples:

<50%=50%> -- left is left aligned, right is right aligned, equal length <=> -- the same >20=> -- left is right aligned, 20% width, right is right aligned, 80% =1% -- same as <99=1> or <99%=1%>

using '==' instead of '=' enables no-word-wrap style