#IF (("" EQ "1") AND ("" NE "EDIT"))
my $ablage="";
if (substr($ablage,-3) eq '.de') {
$ablage =~ s/\.de/\.en/;
print "English
\n";
} else {
$ablage =~ s/\.en/\.de/;
print "Deutsch
\n";
}
#ELSE
#IF (("" EQ "1") AND ("" NE "en")
English
#ENDIF
#IF (("" EQ "1") AND ("" NE "de")
Deutsch
#ENDIF
#ENDIF