Thread Parse::RecDescent: if-elsif-else (6 answers)
Opened by Wildcard at 2006-04-24 18:49

Wildcard
 2006-04-24 19:19
#65286 #65286
User since
2006-04-24
4 Artikel
BenutzerIn
[default_avatar]
eval() ist ohnehin vorgesehen, um den Teil, der identisch Perl sein wird, zu bewerten. Das ist in meinem Code-Beispiel bei der Bewertung von Ausdrücken auch zu sehen. Das Problem ist eben, dass das nur ein geringer Teil der Geschichte ist und am Ende soetwas herauskommen soll:
Code: (dl )
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
$var = 0x3000;
if ($var <= 0x100) {
description {
base = $var;
id = "uniqe_identifier";
text = "This is the first element with base = $var\n";
}
} elsif ($var <= 0x200) {
$basevar = $var - 0xF;
description {
base = $basevar;
id = "uniqe_identifier";
text = "This is the first element with base = $basevar\n";
}
} else {
$basevar = $var - 0x1F;
description {
base = $basevar;
id = "uniqe_identifier";
text = "This is the first element with base = $basevar\n";
}
}


Also neu definierte Sprachelemente, die an sich nicht Perl sind aber vermischt werden können mit den ensprechenden Programmier-Statements.

View full thread Parse::RecDescent: if-elsif-else