I test this and it works, there must be some other way, but i am only a newbie 
on perl, 

> mysub(@a, @b, @c);

mysub("@a", "@b", "@c");

> sub mysub
> { my @a = ? #arg1 an array $_[0] is not working
>   my @b = ? arg2 another array $_[1] is not working
>   my @c = ? arg3 another array $_[2] is not working
> }
>

sub mysub {
  my @a = shift;
  my @b = shift;
  my @c = shift;
}

Saludos

-- 
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]

Reply via email to