sub { my ( @a, @b ); #... fill in the arrays return \@a, \@b; }