@arr = ([11,12,13], [21,22,23], [31,32,33]); myxsub(@arr);