#!perl -w

# test all the basic functionality

print "Content-type: text/plain\n\n";
print "ok $0";

__END__

this is some irrelevant data
