CGI скриптът може да бъде толкова прост или сложен, колкото ви е необходим. Може да е в Перл, Ява, Python или който и да е програмен език. В основата си, CGI приложение просто приема заявка чрез HTTP (обикновено уеб браузър) и връща HTML. Нека да разгледаме обикновен Perl Здравей свят CGI скрипт и го разбийте на най-прости форми.

 #! / ЮЕсАр / хамбар / Perl
печат "Тип на съдържанието: текст / html \ n \ n";
печат <




Прост Perl CGI

Здравей свят


HTML
излезете; 

Ако стартирате програмата в командния ред, ще видите, че тя прави точно това, което бихте очаквали. Първо, тя отпечатва Тип съдържание линия, след това отпечатва суровия HTML. За да го видите в действие в уеб браузър, ще трябва да копирате или качите скрипта на вашия уеб сървър и да се уверите, че разрешенията са зададени правилно (chmod 755 за * nix системи). След като го зададете правилно, трябва да можете да го прегледате и да видите страницата, показана на живо на вашия сървър.

Ключовият ред е първото изявление за печат:

 печат "Тип на съдържанието: текст / html \ n \ n"; 

Това казва на браузъра, че документът, идващ след двамата редове ще бъде HTML. Ти трябва да изпратете заглавка, така че браузърът да знае какъв тип документ е следващият и трябва да включите празен ред между заглавката и действителния документ.

След като заглавката бъде изпратена, става въпрос само за изпращане на самия HTML документ. В горния пример използваме тук-doc, за да опростим отпечатването на голям парче обикновен текст. Разбира се, това наистина не се различава от това да разполагате с обикновен HTML документ на вашия сървър. Истинската сила на използването на език за програмиране като Perl за създаване на вашия HTML идва, когато добавите фантазия на Perl програмиране.

В следващия пример, нека вземем част от това време и дата скрипт и го добавете към вашата уеб страница.

 #! / ЮЕсАр / хамбар / Perl
@months = qw (януари февруари март април май юни юли август септември октомври ноември декември);
@weekDays = qw (Sun Mon Tue Wed Thu Fri Sat Sun);
($ секунда, $ минута, $ час, $ dayOfMonth, $ месец, $ yearOffset, $ dayOfWeek, $ dayOfYear, $ daylightSavings) = localtime ();
$ година = 1900 + $ година компенсиране;
$ the Time = "$ weekDays [$ day of Week] $ months [$ month] $ dayOfMonth, $ year";
печат "Тип на съдържанието: текст / html \ n \ n";
печат <




Прост Perl CGI

$ theTime


HTML
излезете; 

Този нов CGI скрипт ще вмъква текущата дата в страницата при всяко извикване на скрипта. С други думи, става а динамичен документ, който се променя с промяната на датата, а не статичен документ.