Thread Tupel in Perl (29 answers)
Opened by flixxflaxx at 2013-07-20 14:10

hlubenow
 2013-07-24 23:34
#169112 #169112
User since
2009-02-22
875 Artikel
BenutzerIn
[default_avatar]
Puh, ich glaube, allmählich erreiche ich mein Limit in Perl.
Ich kann nur kurz in Python erklären, wie ich das gemeint hatte, "AoA durch Objekt ersetzen". Python läßt locker z.B. "Tuple von Tuple von Tuple" zu (und noch weit tiefer). Das dann also so formulieren, daß man die Tuples flach in mehreren Objektattributen speichert. Beispiel:
Code (python): (dl )
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24

#!/usr/bin/env python
# coding: iso-8859-1

# Statt:

a = (((1, 2),   (3, 4)),
     ((5, 6),   (7, 8)),
     ((9, 10), (11, 12)))

print a[2][1][1]

# So:

class Container:
    def __init__(self):
        self.e_00_00 = (1, 2)
        self.e_00_01 = (3, 4)
        self.e_01_00 = (5, 6)
        self.e_01_01 = (7, 8)
        self.e_02_00 = (9, 10)
        self.e_02_01 = (11, 12)

c = Container()
print c.e_02_01[1]

Und das dann in Perl 5 (grusel). Geht wie gesagt trotzdem nicht (s.o.), jedenfalls nicht einfach, man gewinnt nichts dabei, man braucht immer noch komplizierte Referenzen.

View full thread Tupel in Perl