Perl bietet ebenfalls die Möglichkeiten der strukturierten Programmierung. Häufig
benötigte
Funktionen können in Unterprogramme ausgelagert werden. Ein Unterprogramm ist
gekennzeichent durch das Schlüsselwort "sub" und kann einen Wert (Skalar/Array)
zurückgeben. Die Übergabe von Parametern erfolgt "call-by-value" in dem Array @_. In der
Praxis sieht das wie folgt aus:
sub max {
$maxval = shift @_; # initialisiere
maxval mit dem ersten Wert aus @_
foreach $tmp (@_) { # gehe durch alle
Parameter durch
$max=$tmp
if ( $max< $tmp);
}
return $max;
}
Ein Aufruf sieht wie folgt aus:
&max(23,
42, 55, 66);
&max(2.4,
7.9, 42, 1234, 323);
