#!/usr/bin/perl -w
use strict;

use CGI;
my $cgi = CGI->new;
my $user_input = $cgi->param('input');

print $cgi->header('text/plain');
print "Echo returns: ", qx/echo $user_input/;