Perl -> copy file

[Kaffeetrinker]

Hallo,

kann mir bitte jemand sagen warum die erste Zeile funktioniert, jedoch die zweite nicht?

mkdir ("$base_dir/$login", 0777) || die("Could not create user directory:");

cp ("/var/www/html/8.gif", "$base_dir/$login/a.gif") || die("Could not copy image:");


im browser bekomme ich (nachdem das verzeichnis erfolgreich erstellt wurde) folgende fehlermeldung:

The following error occurred : Undefined subroutine &main::cp called at /var/www/html/site/cgi-bin/script.pl line 361.

Die Zeile 361 ist genau jene mit dem copy file befehl.

wäre euch echt für jede hilfe dankbar!
chris

[Manuel Capellari]

mir wäre nichts drüber bekannt, dass perl direkt über eine cp funktion verfügt, du hast mehrere möglichkeiten eine datei zu kopieren ...

<b>variante 1 (sollte auf jeder plattform funktionieren):</b>
datei händisch öffnen und am zielort neu schreiben
nachteil: kann bei grossen dateien, bzw. bei einer grossen anzahl von dateien ziemliche performanceeinbussen bedeuten


<b>variante 2 (sollte auf den meisten plattformen funktionieren):</b>
use File::copy;


<b>variante 3 (sollte auf den meisten unix plattformen funktionieren):</b>
system ("cp $quelle $ziel"); oder alternativ `cp $quelle $ziel`


es gibt sicher noch einige andere möglichkeiten um eine datei mit perl zu kopieren

[Kaffeetrinker]

danke manuel

variante 2+3 haben funktioniert!

use POSIX; (ohne dem gehts nicht)
use File::Copy cp;
cp ("quelle", "ziel");

thx!
Kaffeetrinker