#!/usr/bin/perl

use strict;
use warnings;

my $ldoc = <<HERE_DOCUMENT;
\\documentclass{scrlttr2}
\\usepackage{german}
\\usepackage[latin1]{inputenc}
\\begin{document}
Grüße aus Österreich!
\\end{document}
HERE_DOCUMENT

$ldoc =~ s/Ö/\\"O/g;

print $ldoc;