from Biblio::Catalog::BibTeX :
sub tex2html {
my $latex = shift;
return "" unless defined($latex);
for ($latex) {
s/\\textit\{([^{]+)\}/$1<\/i>/g;
s/\\textbf\{([^{]+)\}/$1<\/b>/g;
s/\\texttt\{([^{]+)\}/$1<\/tt>/g;
s/\\emph{([^{]+)}/$1<\/i>/g;
s/\\item\b//g;
s/\\_/_/g;
s/\\mbox{([^}]+)}/$1/g;
s/{\\it\s([^}]+)}/$1<\/i>/g;
s/\\LaTeX/LaTeX/g;
s/\\begin{itemize}//g;
s/\\begin{quote}//g;
s/\\end{quote}/<\/i><\/blockquote>/g;
s/\\end{itemize}/<\/ul>/g;
s/[}{]//g;
}
return $latex;
}