$_ und @_ übergeben - #73555 (Allgemeines zu Perl)

esskar

2007-01-25 09:08

User since
2003-08-04
7321 Artikel
ModeratorIn

user image

[quote=topeg,24.01.2007, 20:02]

Code (perl): (dl )

sub test
{
 my $v1=shift(@_);
 my @v2=@_;
 print "V1=$v1 V2=@v2\n";
}

&test("ein kleiner Test", "TEST", "TEST2", 3, 4, 5);

[/quote]

Code: (dl )

# oder
sub test {
   my ($v1, @v2) = @_;
   # ...
}
# oder
sub test {
   my ($v1, @v2) = (shift, @_);
   # ...
}

je nach dem was man braucht!\n\n