$aref->[0] $#$aref for $x (@$aref) {...}