my $imgdata = img_egapal(\@palette);
my $tablespan = scalar map { @$_ } @colmap;
$out .= "<tr><td colspan=$tablespan>$imgdata";
my $imgdata = img_egapal(\@palette);
my $tablespan = scalar map { @$_ } @colmap;
$out .= "<tr><td colspan=$tablespan>$imgdata";