Hi Tom, Am 05.01.2012 09:17, schrieb "T. Bühlmann": [...]
In Perl mache ich (etwas vereinfacht):
my @list = glob("$dir/*.jpg"); : my %objects = {}; foreach my $name (@list) { my $ziel = ... $objects{"$name"} = $ziel; } : : foreach my $srcObject (sort keys %objects) { my $cpresult = `cp "$srcObject" "$destObject" 2>&1`; chomp $cpresult; # oder auch my $status = copy("$srcObject", "$destObject"); }
($srcObject = "Küste-Wanderung-1.jpg")
Was passiert wenn du in PERL das UTF-8 pragma setzt? "usr utf-8;" (Siehe http://perldoc.perl.org/utf8.html) Bin kein grosser PERL Spezialist, aber das hat mit bei solchen Probs immer wieder mal geholfen. Vielleicht klappts auch bei dir?
Danke für die Antwort. Auf diese Seite bin ich auch gestossen. Wenn ich "use utf-8;" mit reinnehme, dann mag auch copy("$srcObject", "$destObject") nicht kopieren. Ich bekomme dann auch hier die gleiche Fehlermeldung wie bei `cp $srcObject...`. Ich hoffe, dass mir ein Perl Spezialist mehr sagen kann, was da in den Eingeweiden so passiert und wo ich eingreifen muss/kann. Danke und Gruss Werner