#!/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;