2 Fragen (Subroutine, kürzere Schreibweise)

[xNeTworKx]

Hallo,
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);
Kann ich das nicht irgendwie abkürzen ?

Frage 2 :
Wenn ich Werte einer Subroutine übergebe zB :
&test($wert1,$wert2);
warum kann ich dann von der Subrountine aus die Werte $wert1 und $wert2 nur dann verändern, wenn ich es folgendermaßen schreibe :

sub test    {
my ($wert1, $wert2) = @_;

$wert1 = 'neuerWert'; # nur $wert1 der Subroutine ändert sich,
                        # nicht ausserhalb
  $_[0] = 'neuerWert'; # jetzt hat $wert1 ausserhalb der Sr. den Wert
                       # neuer Wert.
}

ich finde es ziemlich unübersichtlich, wenn ich immer mit $_[0], $_[1], usw arbeiten muss. Kann ich nicht vielleicht irgendwie mit $wert1, $wert2 der Subrountine arbeiten, sodaß ich mit diesen Variablen den Wert verändern kann ?

danke im Vorhinein.