#!/usr/bin/perl
use CGI;
my $q = new CGI;

print
  $q -> header,
  $q -> start_html( -base => { 'href' => '$url' }),
  $q -> p( 'blah, blah' ),
  $q -> end_html;