/usr/bin/stag-itext2xml is in libdata-stag-perl 0.14-2.
This file is owned by root:root, with mode 0o755.
The actual contents of the file can be viewed below.
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 | #!/usr/bin/perl -w
use Data::Stag qw(:all);
use Data::Stag::ITextParser;
use Data::Stag::XMLWriter;
use Data::Stag::Base;
my $p = Data::Stag::ITextParser->new;
my $h = Data::Stag::Base->new;
#my $h = Data::Stag::XMLWriter->new;
$p->handler($h);
foreach my $f (@ARGV) {
$p->parse($f);
print $h->tree->xml;
}
__END__
=head1 NAME
stag-itext2xml - converts between stag formats
=head1 DESCRIPTION
Converts from itext to xml format.
=head1 SEE ALSO
L<Data::Stag>
=cut
|