nicht angemeldet
Hallo,
Hallo Leutz,
Bitte wer?
[... Liste mit Dateinamen ...]
danach will ich die Dateien öffnen/erstellen - und hier hakt es:
foreach(@eing)
{
open($eing[$e], ">$ARGV[0].$eing[$e]");
$e++;
}
Wozu ein $e, wenn du doch eh mit foreach arbeitest? Warum nicht einfach
so:
foreach(@eing)
{
local *DAT;
open(DAT, '>'.$ARGV[0].$_) or die $!; # nicht vergessen!
$_ = \*DAT;
}
Hierbei darfst du aber nicht vergessen, die Dateien wieder zu
schliessen, z. B. mit
foreach(@eing)
{
close $_ or die $!;
}
perldoc perlopentut, perldoc perldata und perldoc -f open helfen
btw. auch.
Gruss,
CK