Select Code to Download

#!/usr/bin/env perl -l

...
        print $out_fh $indent, $_;
    }
}

__FILE0__
<doc>
...
    </Feature>
</ABC>
</doc>

<Key="1234">
    <File0>
...
    </Features>
    <Other_Status/>
</Key>