my $source='/home/www/user/logs/access_log'
my $dest='/home/www/user/dir/mylogs/access_log.'.localtime(); #<== Satum anhängen, denke mir währe nützlich :-)
# mv = move = verschieben
system("mv",$source,$dest)==0 or die("Fehler beim kopieren des Logs");
# touch = anfassen = Datei erstellen, oder Zugriffszeit aktualisieren
system("touch" $source); # < keine Fehlermeldung, einfach nur versuchen...