# requires 'use utf8' and a utf8-enabled editor sub latexise_umlauts { my $string = shift; $string =~ s/\\/{\\backslash}/g; $string =~ s/\$/{\\\$}/g; $string =~ s/&/{\\&}/g; $string =~ s/%/{\\%}/g; $string =~ s/#/{\\#}/g; $string =~ s/_/{\\_}/g; $string =~ s/>/{\\textgreater}/g; $string =~ s/