Perl does not directly support multidimensional arrays, you need to create such complex structures using references. So you in effect create an array of references to other arrays. As to howto define this:

@TDArray = (["Flange", "Widget"],
            ["Gerbal","Twaddle]);

#Prints Flange
print $TDArray[0][0];
[download]

Checkout Chapter 4 of the cammel book for more information or array of arrays or perlman:perllol.
HTH
--

Zigster