#!/Perl/bin -w
use strict;
use Thread;
use CGI;
use CGI::Carp qw(fatalsToBrowser);

print "Before CGI creation";
my $q = new CGI;
print $q->header( "text/plain" );


print "Before second system call";
system 'cmd.exe /c notepad.exe' || die "Cannot execute notepad.exe";