Community  »  Perl/CGI: Scripts des Perl-Archiv

max(a,b) unter Perl ?	Seitenanfang
Hi ich habe ein Problem, ich beschäftige mich erst seid heute mit Perl, weil ich ein Programm bekommen habe und es nun umschreibe, eigentlich ist es nur eine Rechung. Aber ich brauche diesen Ausdruck für Perl: max(a,b) Datum: 22.04.2005-18:21
re: max(a,b) unter Perl ?	Seitenanfang
was soll max(a,b) machen? Datum: 23.04.2005-14:11
re: max(a,b) unter Perl ?	Seitenanfang
es ist unter exel ein mathematischer Ausdruck, wie sin() oder cos() es wird jeweils die maximale zahl ausgeben, z.B. max(5,2) = 5 ich muss nun wissen wie es unter perl geht Datum: 25.04.2005-08:49
re: max(a,b) unter Perl ?	Seitenanfang
Hallo, Bedingungsoperator! Z.B. $max = $a > $b ? $a : $b; Liefert genau das, was Du möchtest. Verpackt als Funktion: sub max { my $a = shift; my $b = shift; return $a > $b ? $a : $b; } Verwendet im Script: $max = &max($a,$b); Ciao Ingo Datum: 25.04.2005-15:45
re: max(a,b) unter Perl ?	Seitenanfang
$max = $a > $b ? $a : $b; Datum: 25.04.2005-15:46