Opened by Gast at 2006-05-22 10:27
Hi renee!
also erstmal: ich würde unten schreiben, kann mich aber hier nicht anmelden, board scheint nicht zu funktionieren, habe es jetzt 2 mal probiert und keen bock mehr.
also ich habe es mal mit ncopy versucht und es tut sich jetzt gar nichts. das rpgramm läuft durch und das wars. hier mal der quellcode:
danke im voraus,
Micha
also erstmal: ich würde unten schreiben, kann mich aber hier nicht anmelden, board scheint nicht zu funktionieren, habe es jetzt 2 mal probiert und keen bock mehr.
also ich habe es mal mit ncopy versucht und es tut sich jetzt gar nichts. das rpgramm läuft durch und das wars. hier mal der quellcode:
Code: (dl
)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
use strict;
use File::Copy;
use File::NCopy;
# src - pfad
# dest - pfad
# trash - pfad
my $system = 'C:/Entwicklung/Perl/projects/Testen';
my $src = $system . '/src';
my $dest = $system . '/dest';
my $trash = $system . '/trash';
my $file = File::NCopy->new('recursive' => 1);
$file->copy ($src,$dest);
danke im voraus,
Micha