Opened by Gast at 2006-01-11 17:52
Hallo zusammen,
wenn ich den unten aufgführten Code ausführe bekomme ich folgende Fehlermeldung auf dem Unix-System: No such file or directory. Kann mir vielleicht jemannd weiterhelfen? Danke.
wenn ich den unten aufgführten Code ausführe bekomme ich folgende Fehlermeldung auf dem Unix-System: No such file or directory. Kann mir vielleicht jemannd weiterhelfen? Danke.
Code: (dl
)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
#!/usr/local/bin/perl
use File::Copy;
use Cwd;
use FileHandle;
open(DATEI,"<pfade.txt");
while($zeile=<DATEI>)
{
push(@patharray,$zeile);
}
close(DATEI);
for($i=0;$i<@patharray;$i++)
{
$srcPath = "@patharray[$i]";
opendir(inVERZ, $srcPath) || die "Verzeichnis ".$srcPath." nicht gefunden $!";
Anweisung
closedir(inVERZ);
}