|< 1 2 >| | 14 Einträge, 2 Seiten |
$file->copy( $src, $aim ) or die " ... Fehler!" . $!;
1
2
3
4
5
if (-e $src) {
$file->copy( $src, $aim ) or die " ... Fehler!" . $!;
} else {
print "$src existiert nicht."
}
open(FH, "<test") or $!;
open(FH, "<test") or warn $!;
copy ($newsrc ,$newaim) or print LOGFILE "$time\t$src\tERROR\tKopieren fehlgeschlagen\n";
|< 1 2 >| | 14 Einträge, 2 Seiten |