If @test is a 2d array, then passing $test[2] to the subroutine passes an array reference, not an array. To pass the array, you have to dereference it:

@a = permutations(@{ $test[2] });
[download]

See perllol - Manipulating Arrays of Arrays in Perl for details.