Een CGI-script kan zo eenvoudig of complex zijn als u wilt. Het kan in Perl, Java, Python of elke programmeertaal zijn. In de kern accepteert een CGI-toepassing eenvoudig een aanvraag via HTTP (meestal een webbrowser) en retourneert HTML. Laten we eens kijken naar een eenvoudige Perl Hallo Wereld CGI-script en splitsen het op in zijn eenvoudigste vormen.

'Hello World' CGI Perl-script

 #! / Usr / bin / perl
print "Inhoudstype: tekst / html \ n \ n";
afdrukken <

Een eenvoudige Perl CGI


Een eenvoudige Perl CGI

Hallo Wereld


HTML
Uitgang;

Als u het programma op de opdrachtregel uitvoert, ziet u dat het precies doet wat u zou verwachten. Eerst drukt het de Content-type regel, dan wordt de onbewerkte HTML afgedrukt. Om het in actie te zien in een webbrowser, moet u het script naar uw webserver kopiëren of uploaden en zorgen dat de machtigingen correct zijn ingesteld (chmod 755 op * nix-systemen). Nadat u het correct hebt ingesteld, moet u ernaar kunnen bladeren en de pagina live op uw server kunnen zien.

De hoofdregel is de eerste afdrukopdracht:

 print "Inhoudstype: tekst / html \ n \ n";

Dit vertelt de browser dat het document na de twee komt newlines wordt HTML. U moet stuur een koptekst zodat de browser weet welk type document er nu komt en u een lege regel tussen de koptekst en het eigenlijke document moet opnemen.

Zodra de kop is verzonden, is het gewoon een kwestie van het HTML-document zelf verzenden. In het bovenstaande voorbeeld gebruiken we een hier-doc om het afdrukken van een groot stuk platte tekst te vereenvoudigen. Dit is natuurlijk niet anders dan een gewoon HTML-document op uw server te hebben staan. De echte kracht van het gebruik van een programmeertaal zoals Perl om je HTML te maken, komt wanneer je wat mooie Perl-programmering toevoegt.

Toevoegen aan het basisscript

Laten we in het volgende voorbeeld aan dit tijd- en datumscript deelnemen en dit aan uw webpagina toevoegen.

 #! / Usr / bin / perl
@months = qw (jan feb mrt apr mei jun jul aug sep okt nov dec);
@weekDays = qw (zon ma di wo do vr za zo);
($ seconde, $ minuut, $ uur, $ dayOfMonth, $ month, $ yearOffset, $ dayOfWeek, $ dayOfYear, $ daylightSavings) = localtime ();
$ jaar = 1900 + $ jaar Offset;
$ theTime = "$ weekDays [$ dayOfWeek] $ maanden [$ month] $ dayOfMonth, $ jaar";
print "Inhoudstype: tekst / html \ n \ n";
afdrukken <

Een eenvoudige Perl CGI


Een eenvoudige Perl CGI

$ het Time


HTML
Uitgang;

Dit nieuwe CGI-script voegt de huidige datum in de pagina in telkens wanneer het script wordt aangeroepen. Met andere woorden, het wordt een dynamisch document dat verandert als de datum verandert, in plaats van een statisch document.