Parameterauswertung

paramcgi.pl

#!/usr/local/bin/perl -Tw use strict; use CGI; my $q = new CGI; print $q->header("text/plain"), "My parameters:\n\n"; my ($name, $value); foreach $name ($q->param) { print "$name:\n"; foreach $value ($q->param($name)) { print " $value\n"; } }

new CGI liefert ein Objekt, über das die CGI-Methoden zur Verfügung stehen.

Über die Methode param können die Elemente dann ausgewertet werden.

Im Listenkontext liefert param die Namen aller Parameter, sonst einen einzelnen.

	`new CGI` liefert ein Objekt, über das die CGI-Methoden zur Verfügung stehen.
	Über die Methode `param` können die Elemente dann ausgewertet werden.
	Im Listenkontext liefert `param` die Namen aller Parameter, sonst einen einzelnen.