#!/usr/bin/env perl

use strict;
use warnings;
use CGI;
use CGI::Carp('fatalsToBrowser');
use JSON::PP();

my $q = CGI->new;
print $q->header(),
$q->start_html(-title=>"Hello World"),
$q->h2("Hello World"),
$q->end_html();