Select Code to Download

#!/usr/bin/perl

...
use Data::Dump 'dd'; dd { 'sorted_transpose' => \@sorted_transpose,
  'wanted effects' => \@effects,
  'matrix' => \@matrix };

{
  "matrix" => [
...
  ],
  "wanted effects" => ["mis", "mis", "del", "mis", "mis", "del"],
}