|< 1 2 >| | 16 Einträge, 2 Seiten |
QuoteSoftware - Einführungstext - Kompletter Text
+Windows - Einführungstext - Kompletter Text
++Software - Einführungstext - Kompletter Text
+++Grafikprogramme - Einführungstext - Kompletter Text
+++Sicherheitsprogramme - Einführungstext - Kompletter Text
++Games - Einführungstext - Kompletter Text
+Linux - Einführungstext - Kompletter Text
+MacOS - Einführungstext - Kompletter Text
+DOS - Einführungstext - Kompletter Text
Hardware - Einführungstext - Kompletter Text
+Hardware - Einführungstext - Kompletter Text
++Mainboard - Einführungstext - Kompletter Text
++Grafikkarte - Einführungstext - Kompletter Text
+++AGP-Karte - Einführungstext - Kompletter Text
+++PCI-Karte - Einführungstext - Kompletter Text
+Zubehör - Einführungstext - Kompletter Text
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
- name: Software
intro: Einfuehrungstext
text: Kompletter Text
sub:
- name: Windows
intro: Einfuehrungstext
text: Kompletter Text
sub:
- name: Software
intro: Einfuehrungstext
text: Kompletter Text
sub:
- name: Grafikprogramme
intro: Einfuehrungstext
text: Kompletter Text
- name: Sicherheitsprogramme
intro: Einfuehrungstext
text: Kompletter Text
- name: Games
intro: Einfuehrungstext
text: Kompletter Text
- name: Linux
intro: Einfuehrungstext
text: Kompletter Text
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
use strict;
use Data::Dumper;
my @DATA = <DATA>;
sub nextgroup {
my @ret;
while(1) {
return @ret unless @DATA;
chomp $DATA[0];
local $_ = $DATA[0];
/^(\+*)/;
my $tiefe = length($1);
if ($tiefe == $_[0]) {
push @ret, { descr => shift @DATA, unter => [nextgroup($_[0] + 1)] };
} elsif ($tiefe > $_[0]) {
die "geht ja wohl nich";
} else {
return @ret;
}
}
}
my @baum = nextgroup (0);
print Dumper(\@baum);
#### hier muss _ _ D A T A _ _ stehen, aber das Forum will das nicht in einem wort
Software - Einführungstext - Kompletter Text
+Windows - Einführungstext - Kompletter Text
++Software - Einführungstext - Kompletter Text
+++Grafikprogramme - Einführungstext - Kompletter Text
+++Sicherheitsprogramme - Einführungstext - Kompletter Text
++Games - Einführungstext - Kompletter Text
+Linux - Einführungstext - Kompletter Text
+MacOS - Einführungstext - Kompletter Text
+DOS - Einführungstext - Kompletter Text
Hardware - Einführungstext - Kompletter Text
+Hardware - Einführungstext - Kompletter Text
++Mainboard - Einführungstext - Kompletter Text
++Grafikkarte - Einführungstext - Kompletter Text
+++AGP-Karte - Einführungstext - Kompletter Text
+++PCI-Karte - Einführungstext - Kompletter Text
+Zubehör - Einführungstext - Kompletter Text
|< 1 2 >| | 16 Einträge, 2 Seiten |