2014-11-17T12:34:46 Matze2.pl

@allesfiles in eine Datei zu schreiben lass ich noch eine schleife laufen

Code (perl): (dl )

1
2
3
4
5
6

foreach $allefile (@allefiles)
{
open (ZWEITE,">>/var/lib/testverzeichnis/k_loesch/loeschtxt/$mydate.txt");
  print ZWEITE "$allefile";                                                             
close (ZWEITE);
}

1
2
3
4
5

open( my $zweite_fh, ">>", "/var/lib/testverzeichnis/k_loesch/loeschtxt/$mydate.txt") or die $!;

print $zweite_fh join( "\n", @allefiles );

close $zweite_fh;