2 Fragen (Subroutine, kürzere Schreibweise)

[Calocybe]

Hi!

ich hab da mal wieder einmal Fragen zu Perl, und zwar hätte ich gerne diesmal gewusst, wie ich 1. folgendes kürzer ausdrucken kann:
zB:
my ($var1,$var2,$var3,$var4,$var5) = (0,0,0,0,0);

Ein *bisschen* kuerzer, aber nicht sehr:
my ($var1,$var2,$var3,$var4,$var5) = (0)x5;

Wenn Du 80 Variablen hast, denen Du allen den Wert 12345 geben willst, lohnt es sich vielleicht. ;-)

Wie der x-Operator funktioniert? perldoc perlop, Multiplicative operators.

So long

--
Die Aggressivitaet kommt vom Heavy Metal!!! CounterStrike ist doch nur zum Runterkommen!!!!!