open my $strace_logger,'>','/dev/null';
$strace_logger->autoflush(1);
[...]
print $strace_logger "SHORT STATUS MSG";