table(1,
      { id => 1,
        rows => [
            { type => 'headings',
              data => [qw/NAME STRENGTH COMMENT/],
            },

            { type => 'whead',
              data =>  [
                        [1,   [2,   { style => 'text-align: right' }], 'no'],
                        [2,   [3,   { style => 'text-align: right' }], 'yes'],
                        [10,  [20,  { style => 'text-align: right' }], 'another'],
                        [100, [200, { style => 'text-align: right' }], 'comment'],
                       ],
            },

            { type => 'headings',
              data =>  [['List to go with the whead' { colspan => 3 }]],
            },

            { type => 'data',
              data =>  [
                        [ 'list',
                          { class => 'info',
                            colspan => 3,
                            list => [$list, { class => 'two_cols' }]
                          }
                        ]
                       ]
            }
        ]
      }
     );