#!/usr/local/bin/perl

print "200 OK\n";
print "Content-type: text/plain\n";
print "\n";

print "Test exec.\n";
exec "pwd";
