print $query->start_table({-align=>'center'}),
      $query->start_Tr({bgcolor=>'#9933FF'}),
      $query->start_th({-align=>'center', -colspan=>5}), $query->strong('VOLUNTEER'),
      $query->start_th({-align=>'center', -colspan=>5}), $query->strong('DATE'),
      $query->start_th({-align=>'center', -colspan=>5}), $query->strong('UNDO'),
      $query->end_Tr;
      $query->start_Tr({bgcolor=>'#99FF99'}),
      $query->start_td({-align=>'center', -colspan=>5}), $query->strong($name),
      $query->start_td({-align=>'center', -colspan=>5}), $query->strong($signup_date),
      $query->start_td({-align=>'center', -colspan=>5}),  $query->checkbox(-name=>"remove",-value=>$signup_date),
      $query->end_Tr;
print $query->end_table;

##</code><code>##

#!/usr/bin/perl

use CGI qw(:standard);

print table({-align=>'center'},
      Tr({bgcolor=>'#9933FF'}, 
         th({-align=>'center', -colspan=>5}, 
             [strong('VOLUNTEER'), strong('DATE'), strong('UNDO')]
           )
        ),
      Tr({bgcolor=>'#99FF99'},
      	td({-align=>'center', -colspan=>5}, 
      		[strong($name), strong($signup_date), 
               checkbox(-name=>"remove",-value=>$signup_date)]
      	  )
      	)
      );