#!/usr/bin/perl
use CGI::Carp qw(fatalsToBrowser warningsToBrowser);
 use CGI;
 my $cgi = CGI->new();
 print $cgi->header();
 warningsToBrowser(1); # dies ist wichtig und muss nach dem Header kommen!

print "Hallo Welt";