foreach $ary (@arrays) { print $#{ary}; }