open( my $mytrace, '>>', GTSconfig::EXCHANGE_DIR.$fname ) or die $!; # hier ein "or die $!", damit du Fehler mitbekommst. Und meinst du $GTSconfig::...? print $mytrace $message, "\n"; close $mytrace; # das Close kannst du dir auch sparen, wenn $mytrace sowieso out of scope geht