- or download this
use strict;
use warnings;
use XML::TreeBuilder;
my $xmlStr = <<'STR';
- or download this
<root>
<Check>
<Detail>
...
</Detail>
</Check>
</root>
- or download this
STR
...
print "Col: " . $_->as_text () . "\n" for ($_->find ('Col'));
}
}
- or download this
Col: Guest
Col: Weak
...
Col: -
Col: C:
Col: NTFS