File::Copy::copy( $srcpath, $dstpath ) || die print FILE strftime "%a, %d %b %Y %H:%M:%S    Es ist ein Fehler beim...", localtime;