CGI.pm
≈ 2 min read
Names in other languages
No names in other languages are held for this entry yet.
Article bodies are English and are not machine-translated. A name in another language is not a translation of the article.
CGI.pm is a large and once widely used Perl module for programming Common Gateway Interface (CGI) web applications, providing a consistent API for receiving and processing user input. There are also functions for producing HTML or XHTML output, but these are now unmaintained and are to be avoided. CGI.pm was a core Perl module but has been removed as of v5.22 of Perl. The module was written by Lincoln Stein and is now maintained by Lee Johnson.
CGI.pm is a large and once widely used Perl module for programming Common Gateway Interface (CGI) web applications, providing a consistent API for receiving and processing user input. There are also functions for producing HTML or XHTML output, but these are now unmaintained and are to be avoided. CGI.pm was a core Perl module but has been removed as of v5.22 of Perl. The module was written by Lincoln Stein and is now maintained by Lee Johnson. !/usr/bin/env perl use strict; use warnings; use CGI; my $cgi = CGI->new; print $cgi->header('text/html'); print A Simple CGI Page A Simple CGI Page Name: Age: EndOfHTML if ( my $name = $cgi->param('name') ) { print "Your name is $name. "; } if ( my $age = $cgi->param('age') ) { print "You are $age years old."; } print ' '; This would print a very simple webform, asking for your name and age, and after having been submitted, redisplaying the form with the name and age displayed below it. This sample makes use of CGI.pm's object-oriented abilities; it can also be done by calling functions directly, without the , however the necessary functions must be imported into the namespace of the script that requires access to those functions: !perl use strict; use warnings; use CGI qw/ :standard /; print header('text/html'); ... HTML output same as above example if ( my $name = param('name') ) { print "Your name is $name. "; } if ( my $age = param('age') ) { print "You are $age years old."; } print ' '; Note: in many examples , short for query, is used to store a CGI object. ==See also== mod_perl ==References== ==External links== CGI.pm – at the CPAN
Text derived from https://en.wikipedia.org/w/index.php?oldid=1362524640 under CC BY-SA 4.0; modifications have been made.