#!/usr/bin/perl
use strict;
use warnings;
use CGI qw(:standard);

my $cgi = CGI->new;
my $txtInput = $cgi->param('txtInput');
warn $txtInput;
print $cgi->header();
print $cgi->start_html('Testing');
print $cgi->h1($txtInput);
print $cgi->end_html;