my $logfile = "/tmp/rnetposts/$ARGV[0]-$scriptname.log";
open(my $LOGDATEI,  ">$logfile") or die "Konnte Datei nicht oeffnen";
chmod(0666, $LOGDATEI);
select($LOGFILE);
print "Progarmm laeuft ab und gibt Informationen aus";
close($LOGDATEI);