#!C:/Perl/bin/perl.exe -w
#my $type = "Störung";
my $type = "Anfrage";
my $type1 = "Failure";
my $type2 = "Request";



if ($type == "Störung")
{
    $type = $type1;
}

elsif ($type == "Anfrage")
{
    $type = $type2;
}

print "$type\n";