Select Code to Download

sub dmp (\[$@%];\[$@%]\[$@%]\[$@%]\[$@%]\[$@%]\[$@%]\[$@%]\[$@%]\[$@%]
+){
  # die "to many arguments for dmp()" if @_>10;
...
    print Data::Dumper->Dump([$struc],[$name]);
  }
}

@fontspec = (
              {
                'id' => '0',
...
              },
              {
# ... and so on