my %number = ( 'One' => '1', 'Two' => '2', 'Three' => '3', ); print $h->table({-bgcolor=>"#99FF00"}, $h->Tr({-align=>'center', -valign=>'top'}, $h->td({-width=>"34%", -height=>"14", -class=>"e", -align=>"center"},1), $h->td({-width=>"33%", -class=>"d", -align=>"center"},1), $h->td({-width=>"33%", -class=>"d", -align=>"center"},1), ), $h->Tr({-align=>'center', -valign=>'top'}, $h->td({-width=>"34%", -height=>"14", -class=>"e", -align=>"center"},2), $h->td({-width=>"33%", -class=>"d", -align=>"center"},2), $h->td({-width=>"33%", -class=>"d", -align=>"center"},2), ), );