From 17d0f97553324d148d594d539cfa1d98845a65d1 Mon Sep 17 00:00:00 2001 From: Santhosh Kumar Srinivasan Date: Sun, 2 Oct 2016 11:20:12 -0400 Subject: [PATCH] Create perl.cgi Hello World using Perl CGI object --- p/perl.cgi | 9 +++++++++ 1 file changed, 9 insertions(+) create mode 100644 p/perl.cgi diff --git a/p/perl.cgi b/p/perl.cgi new file mode 100644 index 00000000..118190e4 --- /dev/null +++ b/p/perl.cgi @@ -0,0 +1,9 @@ + #!/usr/local/bin/perl -w + use CGI; # load CGI routines + $q = CGI->new; # create new CGI object + print $q->header, # create the HTTP header + $q->start_html('hello world'), # start the HTML + $q->h1('hello world'), # level 1 header + $q->end_html; # end the HTML + + # http://perldoc.perl.org/CGI.html