I remember being confused because the CGI.pm docs only go into *major* shortcuts for creating tables. But after a little thought, I got it to work like everything else does in the module...

# assuming this...
my $q = new CGI;

# then use this
print $q->Tr(
          $q->td({-width=>'15%'},$col[0]),
          $q->td({-width=>'40%'},$col[1]),
          $q->td({-width=>'25%'},$col[2]),
          $q->td({-width=>'30%'},$col[3]),
      );
[download]

Of course, you may already know this and be looking for a shorter shortcut, but I just thought I'd check.

cLive ;-)