sub passthrough_start {
      return if ($ignore);
    my ($tag) = @_;

    $sectionData{$currentDepth} .= "<$tag>";
}

sub passthrough_end {
       return if ($ignore);
    my ($tag) = @_;
    $sectionData{$currentDepth} .= "</$tag>";
}
[download]

One of my problems is not understanding the SWITCH in the module. Also, I've never written any modules, or looked deeply at existing ones that have something like that.

Also, the tags should be dealt with differently. In the original XML file, the opening scripRef tag can have much more information in it. The closing one is generally just </scripRef>.

Thanks, Monger