Select Code to Download

for $Mx qw(M1 M2 M3 M4 M5 M6 M7 M8) {
   ...
...
   $LayerName{$Mx} = ...;
   ...
}

for $Mx qw(M1 M2 M3 M4 M5 M6 M7 M8) {
   my $cur = $Tracks{$Mx};
...
   $$cur{LayerName} = ...;
   ...
}