Maximum auslesen

[Struppi]

Ich glaube du hast recht, dass Perl mit Zahlen nicht so gut ist. Aber Perl's Stärke liegt glaube ich bei Suchen und Finden von Ausdrücken, und das trifft auf mein Problem ja eher zu.

Naja, die frage ist auch in welcher Form deine Reihe vorliegt. Vieleicht hilft dir das weiter:

my @a = qw(1 2 1 5 2 3);
my $max = 0;
map {$max = $_ if $max < $_} @a;
print $max;

Struppi.