Deklaration von Parametern

count.pl

#!/usr/local/bin/perl use strict; use warnings; sub count (@) { my $sum = 0; $sum += length foreach (@_); return $sum; } print count(<>), "\n";

Parameter-Deklarationen mit Namen gibt es bislang in Perl nicht. Es ist aber möglich, innerhalb von (...) mit Symbolen Überprüfungen von Perl durchführen zu lassen und einen gewissen Kontext zu erzwingen.

Bei obigen Beispiel wird mit (@) ein Listenkontext erzwungen. Demzufolge wird <> beim Aufruf von count in einen Listenkontext gebracht, so daß alle Eingabezeilen als Liste in einem Schwung übergeben werden.

	Parameter-Deklarationen mit Namen gibt es bislang in Perl nicht. Es ist aber möglich, innerhalb von `(...`) mit Symbolen Überprüfungen von Perl durchführen zu lassen und einen gewissen Kontext zu erzwingen.
	Bei obigen Beispiel wird mit `(@)` ein Listenkontext erzwungen. Demzufolge wird `<>` beim Aufruf von `count` in einen Listenkontext gebracht, so daß alle Eingabezeilen als Liste in einem Schwung übergeben werden.