Select Code to Download

<?xml version="1.0" encoding="utf-8" standalone="yes"?>
<ettx ver="2">
...
    </level>
  </table>
</ettx>

package ETTX;
use strict;
...
    $self->{ettxFile} = $ettxFile;
    1;
}

my $ettx = ETTX->new();
$ettx->load($ettxFile);