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 )
          ] )
      );