$mda[0][0] = A;
$mda[0][1] = B;
so forth...
$mda[1][0] = E;
$mda[1][1] = F;
so forth...

##</code><code>##

$ws->write(0, 0, \@mda);  #writes all data into spreadsheet