Subroutine returning 2 arrays

[Gallagher, Tim F \(NE\)]

>From a subroutine I would like to return 2 separate arrays like this
 
sub TEST
{
 @a = ("a1","a2","a3","a4","a5","a6","a7");
 @b = ("b1","b2","b3","b4","b5","b6","b7");
 return (@a, @b);
}
 
my(@lala,@baba) = TEST;
print @lala;
 
 
The problem is that @lala will return a1a2a3a4a5a6a7b1b2b3b4b5b6b7 and
@baba will return nothing. How can I return 2 arrays and have the info
look like this:
print @lala would return a1a2a3a4a5a6a7
print @baba would return b1b2b3b4b5b6b7
 
 
 

Thank you,


Tim