LaTeX templating using Mojo::Template

mojo-tex.pl

#!/usr/bin/env perl

use strict;
use warnings;

use Mojo::Template;

my $mt = Mojo::Template->new(
  comment_mark => '%',
  line_start => '@',
  replace_mark => '@',
  tag_start => '{@',
  tag_end => '@}',
  escape => sub { use TeX::Encode; use Encode; encode 'latex', $_[0] },
);

print $mt->render(<<'END', 'jack & jill');
  @ my $name = shift;
  \documentclass{article}
  \begin{document}
    Hello {@== $name @}
  \end{document}
END

__END__


  \documentclass{article}
  \begin{document}
    Hello jack \& jill
  \end{document}

Thanks, because this is what I'm doing tonight.

Wow @briandfoy, blast from the past!