Is there an isArray() in Perl?

[xorl]

I need to figure out if an element in an array is an array. I have something like:

my @array=("red", "blue", "green", ["purple", "orange"]);

I want to test each element and if the element is array I want it to do something special.

Thanks

Originally posted as a Categorized Question.