CGI.pm - это большой и когда-то широко используемый модуль Perl для программирования веб- приложений Common Gateway Interface (CGI) , предоставляющий согласованный API для приема и обработки пользовательского ввода. Существуют также функции для вывода HTML или XHTML , но они сейчас не поддерживаются, и их следует избегать. [1] CGI.pm был основным модулем Perl, но был удален из Perl версии 5.22. [2] Модуль был написан Линкольном Штайном и сейчас поддерживается Ли Джонсоном.
Автор (ы) оригинала | Линкольн Штайн |
---|---|
Разработчики) | Ли Джонсон |
Стабильный выпуск | 4.21 / 2015-06-22 |
Платформа | Perl |
Тип | Модуль Perl для CGI |
Веб-сайт | metacpan |
Примеры
Вот простая страница CGI, написанная на Perl с использованием CGI.pm (в объектно-ориентированном стиле):
#! / usr / bin / env perlиспользуйте строгий ; использовать предупреждения ;использовать CGI ;мой $ cgi = CGI -> новый ;напечатать $ cgi -> header ( 'text / html' );print << "EndOfHTML" ; DOCTYPE HTML > Простой CGI Страница < мета HTTP - эквив = "Content-Type" содержание = "текст / html; кодировка = ISO-8859-1" /> <тело> Простой CGI Page < форма метод = "пост" ENCTYPE = "многочастному / форм-данных" > имя: < входной тип = "текст" название = "имя" /> < br / > Возраст: < input type = "text" name = "age" />
< input type = "submit" name = "Отправить!" value = "Отправить!" /> < hr /> EndOfHTML if ( my $ name = $ cgi -> param ( 'name' ) ) { print "Ваше имя $ name.
" ; }if ( my $ age = $ cgi -> param ( 'age' ) ) { print "Вам $ age лет." ; }печать '