Select Code to Download

$a->[0] = [qw/f0 f1 f2 f3/];
$b->[0] = [qw/e0 f2 e1 f0 e2];

$m = [
[qw/f0 f1 f2 f3 e0 e1 e2],
[qw/a0 a1 a2 a3 "" "" ""/],# ..and so on all of $a
[qw/b3 "" b1 "" b0 b2 b4/],# ..and so on for $b->[1..$]