Thread Mehrdimensionales Array: Mehrdimensionales Array aus einem file e (7 answers)
Opened by Gast at 2005-12-23 12:21

format_c
 2005-12-23 12:33
#61335 #61335
User since
2003-08-04
1706 Artikel
HausmeisterIn
[Homepage] [default_avatar]
naja fast.
so ungefähr würde der perl code aussehen
Code: (dl )
1
2
3
4
5
6
7
8
9
10
11
12
13
use strict;
use Data::Dumper;

my @data = ();
my $string = qq~KWER02;262;P1-3-1-1-5-2.0;80077
KWER02;15;P1-3-1-1-5-2.0;80078
KWER02;262;P1-3-1-1-5-1.0;80078~;

for (split(/\r?\n/,$string)) {
  push(@data,[split(/;/)]);
}

print Dumper(\@data);

siehe perldoc -f split

Edit:
Wenn die Daten durch ein Filehandle kommen würde das in etwa so aussehen:
Code: (dl )
1
2
3
4
5
6
7
8
9
10
11
12
13
14
use strict;
use Data::Dumper;

my @data = ();

while (<DATA>) {
  push(@data,[split(/;/)]);
}

print $data[0]->[1];
_ _DATA_ _
KWER02;262;P1-3-1-1-5-2.0;80077
KWER02;15;P1-3-1-1-5-2.0;80078
KWER02;262;P1-3-1-1-5-1.0;80078


Würde dann in etwa so eine Datenstruktur erzeugen:
Code: (dl )
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
$VAR1 = [
          [
            'KWER02',
            '262',
            'P1-3-1-1-5-2.0',
            '80077'
          ],
          [
            'KWER02',
            '15',
            'P1-3-1-1-5-2.0',
            '80078'
          ],
          [
            'KWER02',
            '262',
            'P1-3-1-1-5-1.0',
            '80078'
          ],

...


Also mit $data[2]->[1] würde "262" ausgegeben werden.
Gruß Alex\n\n

<!--EDIT|format_c|1135334266-->
Effizente Linuxshell

View full thread Mehrdimensionales Array: Mehrdimensionales Array aus einem file e