Hi Matti
perldoc -f chomp
Jetzt so:
---------------------------------------------
chomp($Abus);
if($Abus eq "busy"){
close (FIRSTCONTROL);
Besetzt();
}
if($Abus eq "free"){
print FIRSTCONTROL "busy";
close (FIRSTCONTROL);
}
---------------------------------------------
Alles ok!
Danke, das war der springende Punk bzw. der "unsichtbare Feind" der if-Anweisung. Hier wird man echt zum Sherlock Holmes!
Viele Grüße
Gary