CELLPADDING=<% $opt{cellpadding} %> BORDER=1 BORDERCOLOR="#000000" <% $opt{bgcolor} %> STYLE="border: solid 1px black; empty-cells: show">
<%init>
my %opt = @_;
$opt{cellspacing} ||= 0;
$opt{cellpadding} ||= 0;
$opt{bgcolor} =~ s/^#//;
$opt{bgcolor} = 'BGCOLOR="#'. $opt{bgcolor}. '"' if length($opt{bgcolor});
%init>