#!/usr/local/bin/perl -w
##### file2.cgi
use CGI;
use strict;

my $cgi = new CGI;
print $cgi->header();
print "foo";
exit;