CELLPADDING=<% $opt{cellpadding} %> <% $opt{bgcolor} %>> <%init> my %opt = @_; $opt{cellspacing} ||= 0; $opt{cellpadding} ||= 0; $opt{bgcolor} =~ s/^#//; $opt{bgcolor} = 'BGCOLOR="#'. $opt{bgcolor}. '"' if length($opt{bgcolor});