#!/usr/bin/perl -w
use strict;
use CGI;
use CGI::Carp qw(fatalsToBrowser warningsToBrowser);
my $cgi = new CGI;
binmode STDOUT, ":utf8";
print $cgi->header (-type => 'text/html', -charset => 'UTF-8');
print "test2";
print $cgi->end_html;