perlunity.de - PERL | JAVASCRIPT | PHP | MySQL | APACHE



#!/COMMUNITY

Members: 5374
davon online: 1
weitere User: 29
 Click for quality!



11.02.2012 / 12:36
Community-Member werden   |   Paßwort vergessen   |   OnlineMonitor (1) Wer ist online ... OnlineMonitor starten !
     

 

Home

PERLscripts

PHPscripts

JAVAscripts

Hilfreiches

Links2www

Newscenter

Community

Interna



Community  »  Perl: Allgemeines Forum zur Themenübersicht Themensuche Themenansicht in Thread-Modus


Beitragmehrere Dateien auf zweidimensionale Variable legen
 Seitenanfang
Hallo,

ich möchte den Dateiinhalt von mehreren Dateien (Textinhalt) in ein zweidimensionales Array legen.Dynamisch über eine Schleife.

@filename ("Name1,Name2,Name3,Name4")

abgefragt soll es dann so werden

@variable[dateinummer][zeilennummer]

Wenn möglich sollten es noch bei 1 und nicht bei 0 beginnen.
Eine Datei auf eine Variable legen...kein Problem, aber mehrere ????

Danke
piet

Datum: 28.02.2005-13:17
Beitragre: mehrere Dateien auf zweidimensionale Variable legen
 Seitenanfang 

use FileHandle;
my @files = ();
foreach my $f ( @filnames ) {
    my $fh = new FileHandle;
    if ($fh->open($f)) {
        my @fc = $fh->getlines();
        push @files, \@fc;
        $fh->close;
    }
}

So hast du ein Array mit Arrayreferenzen auf den Inhalt der Dateien (zeilenweise).
Wenn du die Dateinamen noch brauchst kannst du dir anstatt einem Array @files einen Hash anlegen in dem du filename => \(content) eingibst. Dann ist aber keine Sortierung mehr nach der foreach-schleife gegeben.
mfg pktm

Datum: 03.03.2005-14:01
-






-
 -