Hallo!
Hat das zufällig jemand zur Hand?
Ich habe folgendes Minimalbeispiel:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
use strict;
use warnings;
use XML::Simple qw/XMLin/;
use Data::Dumper qw/Dumper/;
my $string = qq~
<root>
<row no="0">
<col no="0">0.0</col>
</row>
<row no="1">
<col no="0">1.0</col>
</row>
</root>
~;
my $ref = XMLin($string);
print Dumper($ref);
Ich hätte daraus jetzt gerne ein zweidimensionales Array, also so etwas hier:
$VAR1 = [
[
'0.0'
],
[
'1.0'
]
];
Mein Ansatz wäre jetzt erst einmal, die Struktur komplett zu durchlaufen und die Nummern in die Arrays zu stecken. Da die Struktur klein ist, ist das nicht so das Problem. Aber das geht doch bestimmt auch irgendwie besser?
Grüße, pktm