Select Code to Download

<?xml version="1.0" encoding="utf-8" standalone="yes"?>
  <table id="{4fa6cd7a-f7b6-416d-8f59-3acc0eab9bdb}">
...
      <map abrv="JS—K"/>
    </level>
</ettx>

#!/usr/bin/perl -l

...
        )
    ->{table};
print Dumper($tree->{table});