view release on metacpan or  search on metacpan

lib/Acme/PDF/rescale.pm  view on Meta::CPAN

sub compile_tex_file
{
  my $base_name = shift;
  qx(pdflatex $base_name.tex);
}

sub clean_tex_files
{
  my $base_name = shift;
  unlink "$base_name.tex";
  unlink "$base_name.log";
  unlink "$base_name.aux";
}