#!/usr/bin/perl -w

use strict;
use CGI qw(:standard);

print STDERR "TEST";

print header(),start_html(),"foo";