Subroutine in Package - #147495 (Allgemeines zu Perl)

lichtkind

2011-04-09 13:55

User since
2004-03-22
5697 Artikel
ModeratorIn + EditorIn

Code (perl): (dl )

1
2

my @param = @_;
my $user = $#param == 1 ? $param[1] : $param[0];

numerische werte vergleicht man besser mit == statt eq was eher für textvergleiche ist, denn 0 == 0.00 aber '0' ist nicht eq '0.00'.
Last edited: 2011-04-09 13:59:07 +0200 (CEST)

Tutorien in der Wiki, mein zeug:
kephra, baumhaus, garten, gezwitscher

Es beginnt immer mit einer Entscheidung.