add golf example

[catagits/Web-Simple.git] / examples / golf / golf.cgi

diff --git a/examples/golf/golf.cgi b/examples/golf/golf.cgi
new file mode 100755 (executable)
index 0000000..324ce6e
--- /dev/null
+++ b/examples/golf/golf.cgi
@@ -0,0 +1,4 @@
+#!/usr/bin/perl
+use Web::Simple;
+sub dispatch_request { [ 200, [ 'Content-type', 'text/plain' ], [ 'Hello world!' ] ] }
+__PACKAGE__->run_if_script;