--- vdrtranscode/usr/local/bin/vdrtranscode_server.pl.orig	2012-06-19 18:29:52.000000000 +0200
+++ vdrtranscode/usr/local/bin/vdrtranscode_server.pl	2012-06-19 18:34:18.761814146 +0200
@@ -89,11 +89,11 @@
 while ($continue) { # main loop
 
 # log rotation , to prevent large Logfiles
-if ( -f "./vdrtranscode_server.log" and -s "./vdrtranscode_server.log" > 1024000 ) { # log file larger than 1024 Kbyte 
+if ( -f "/var/log/vdrtranscode_server.log" and -s "/var/log/vdrtranscode_server.log" > 1024000 ) { # log file larger than 1024 Kbyte 
   message("$self rotate Logfiles...") ;
   my $gzip_bin =`which gzip`; chomp $gzip_bin ;
   my $logdatei = new Logfile::Rotate(
-                    File  => "./vdrtranscode_server.log",
+                    File  => "/var/log/vdrtranscode_server.log",
                     Count => 5,
                     Gzip  => "$gzip_bin",
                    );
@@ -726,7 +726,7 @@
     print "$message\n" ;
   }
   if ( $log_flag ) {
-    open LOG , ">>./vdrtranscode_server.log" ;
+    open LOG , ">>/var/log/vdrtranscode_server.log" ;
     flock(LOG, LOCK_EX) ;
     unless ( $message =~/waiting/ ) { print LOG "$message\n" ; } # dont flood log with "waiting"
     close LOG ;