#!/usr/bin/perl -w -s
# PODNAME: tmx2html
# ABSTRACT: Converts a TMX to an HTML formatted page
use strict;
use warnings;
use XML::TMX;
use XML::TMX::Reader;
our ($icons);
my $tmx = shift;
my $tmx_obj = XML::TMX::Reader->new($tmx);
binmode(STDOUT,":utf8");
print qq{
<html>
<head>
<style>
tr {
background-color: #e0e0e0;
vertical-align: top;
}
</style>
<title> </title>
<meta charset="UTF-8"/>
</head>
<body>
},
$tmx_obj->to_html(),
qq{</body>
</html>
};
__END__
=pod
=encoding UTF-8
=head1 NAME
tmx2html - Converts a TMX to an HTML formatted page
=head1 VERSION
version 0.36
=head1 SYNOPSIS
tmx2html [-icons] file.tmx > file.html
=head1 DESCRIPTION
Pretty prints a TMX as an HTML file. Icons for languages can be
produced, but still buggy.
=head1 AUTHORS
=over 4
=item *
Alberto Simões <ambs@cpan.org>
=item *
José João Almeida <jj@di.uminho.pt>
=back
=head1 COPYRIGHT AND LICENSE
This software is copyright (c) 2010-2017 by Projeto Natura <natura@di.uminho.pt>.
This is free software; you can redistribute it and/or modify it under
the same terms as the Perl 5 programming language system itself.
=cut