All pastes #896923 Raw Edit

Unnamed

public text v1 · immutable
·published 2008-02-09 01:30 UTC
rendered paste body
#!/usr/bin/perl

use CGI::Carp qw(fatalsToBrowser);
use CGI;
$q = new CGI;
print $q->start_html({
    -head=>Link([
      {-rel=>'stylesheet', -type=>'text/css', -href=>'/foo.css'},
    ]),
  });


print $q -> h1('Glawa'),
	$q -> div({-id => 'header'}),
	$q -> div({-id => 'left_sidebar'}),
	$q -> div({-id => 'content'}),
	$q -> div({-id => 'footer'}),
	$q -> end_html;