use CGI qw/:standard :html3/;

# here's a stylesheet we will incorporate directly into the page
$new_style = '
<!-- 
.big_red {
  font-size: 30pt;
  font-family: sans-serif;
  color: red;
}
-->';

print header();
print start_html( -title=>'CGI.pm using CSS',
                  -style=>{-src=>'http://somesite.com/style.css',
                           -code=>$new_style}
                 );
print table({-border=>2, -class=>'big_red'},
       caption('When Should You Eat Your Vegetables?'),
       Tr({-align=>CENTER,-valign=>TOP},
       [
          th(['Vegetable', 'Breakfast','Lunch','Dinner']),
          td(['Tomatoes' , 'no', 'yes', 'yes']),
          td(['Broccoli' , 'no', 'no',  'yes']),
          td(['Onions'   , 'yes','yes', 'yes'])
       ]
       )
    );
print end_html;