#!/usr/bin/perl use warnings; use strict; use CGI; use CGI::Carp qw(fatalsToBrowser); my $cgi = CGI->new; #print $cgi->redirect(-location=>'test1.cgi'); print $cgi->header( -type=> "text/html" ); print < EOF