#!/usr/bin/perl -wT use CGI; use CGI::Carp qw(fatalsToBrowser warningsToBrowser); use strict; use warnings; unlink "temp.txt" or die "Can't unlink: $!"; print CGI->header(); print q{Hello World}; 1; __END__