Select Code to Download

sub table {
  my ($tab,$opt) = @_;
...

  line($tab,q(</table>));
}

# From ArmorClass.pm

...
      ['data',[[['list', { class => 'info', colspan => $colspan, list 
+=> ['u',$weapons, { class => 'two' }] }]]]]
    ]
  });