Um meine Perl-Anfrage von letzter Woche zu vervollständigen,
die Lösung von Stephan Puck ( "push @local_array, $_[1];" ) hat
wirklich nicht ganz so geklappt wie gewünscht.
Auch der Vorschlag von Max Trense, eine Referenz auf eine Funktion
hat überhaupt kein Wert übertragen:
&func($scalar, @array);
...
sub func {
$localscalar = shift;
@localarray = @ARG;
}
Die Lösung war wirklich wie ich ja auch zuerst vermutet hatte, eine
Referenz auf ein Array beim Aufruf übergeben hat geklappt:
funktion($skalar, [EMAIL PROTECTED]);
sub funktion{
my $local_skalar = shift @_;
my @local_array = @{shift @_}; # Nicht schön, aber selten
}
Nur hatte ich beim Aufruf zunächst ein Slash anstatt ein Backslash
verwendet (schähm) .
Bei Perl sind Theorie und Praxis irgendwie Welten von einander
entfernd :-\
Gruss Christian
----------------------------------------------------------------------------
PUG - Penguin User Group Wiesbaden - http://www.pug.org
