2008/9/30 Vyacheslav Karamov <[EMAIL PROTECTED]>:
>
> I've made a mistake. Correct code:
>
> sub SomeFunc
> {
> my $node = shift @_;
or:
my $node = shift; # shift get @_ as the default arguments
my ($node) = @_; # in list context, $node will get the first element of @_
--
Sandy
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
http://learn.perl.org/
