die '@mat malformed'
   if grep { @{$_} != @{$mat[0]} } @mat;