foreach $aref (@M) {...

##</code><code>##

    foreach $element (@$aref) {...