Fehler_SWCA_UgaUgeMSG ,M_sw_canInter,506,KL_FAT,BHI,AUS_DEFAULT,AKT_NOTAUS,"""MSG Ueberlauf""","""UGA UGE MSG Ueberlauf""",""" """ #### "MSG Ueberlauf" "UGA UGE MSG Ueberlauf" #### #### foreach $txt (@{$txtById{$id}}) { print OUTFILE "\t\t\n"; if ($msg->{id} eq "E_Fehler_SWCA_UgaUgeMSG") #DEBUG OUTPUT { print "$msg->{id}\nTXT =\n$txt->{id}\n$txt->{lang}\n$txt->{txtS}\n$txt->{txtL}\n"; } print OUTFILE "\t\t\t{lang}\">\"$txt->{txtS}\"\n"; print OUTFILE "\t\t\n"; print OUTFILE "\t\t\n"; print OUTFILE "\t\t\t{lang}\">\"$txt->{txtL}\"\n"; print OUTFILE "\t\t\n"; } #### E_Fehler_SWCA_UgaUgeMSG TXT = E_Fehler_SWCA_UgaUgeMSG de MSG Ueberlauf UGA UGE MSG Ueberlauf