@a = ( [2,5,10,5,12,6,21,5,10,12,23],
       [5,6,11,10,5,10,6,21,5,1,9],
       [6,5,10,15,21]
    );
$m = 2;
$n = 2;