TAG( <optional hash>, <scalar>|<array ref> )

##</code><code>##

print $cgi->table( 
          $cgi->Tr( 
               $cgi->td(-width=>"20%", [1,2,3,4,5])
          )
      );

##</code><code>##

print $cgi->table(
          $cgi->Tr( [
              $cgi->td(-width=>"10%", 1 ),
              $cgi->td(-width=>"20%", 2 ),
              $cgi->td(-width=>"30%", 3 ),
              $cgi->td(-width=>"20%", 4 ),
              $cgi->td(-width=>"20%", 5 )
          ] )
      );