Update perl.tex