Also, another way to avoid the "uninitialized variable" warning is to use the += operator.

instead of this: $m_avrg[$a][$b] = ($m_avrg[$a][$b] + $list[$a][$b]);
use this:        $m_avrg[$a][$b] += $list[$a][$b];
[download]