Opened by Tr0Nix at 2008-01-07 20:30
User since
2006-11-21
44 Artikel
BenutzerIn
![[default_avatar]](/battie/theme/default/default_avatar.gif)
2006-11-21
44 Artikel
BenutzerIn
@ronnie:
Danke für den Tipp! YAML sieht echt prima aus.. es geht mir insb. um die Portierbarkeit des Regelsets, YAML scheint auf den ersten Blick genauso gut anwendbar zu sein. Nimm's mir nicht übel, dass ich unten das Beispiel aber noch mit XML gemacht habe :).
@renee:
Stark vereinfachtes Beispiel. Es geht insb. um das Übersetzen der boolschen Logik.
Beispiel Input:
Würde compiliert werden zu:
P.S. danke für den Tipp mit $foo in deinem letzten Beitrag, habs abonniert und schon das erste Magazin erhalten! Echt cooles Design!
Danke für den Tipp! YAML sieht echt prima aus.. es geht mir insb. um die Portierbarkeit des Regelsets, YAML scheint auf den ersten Blick genauso gut anwendbar zu sein. Nimm's mir nicht übel, dass ich unten das Beispiel aber noch mit XML gemacht habe :).
@renee:
Stark vereinfachtes Beispiel. Es geht insb. um das Übersetzen der boolschen Logik.
Beispiel Input:
Code: (dl
)
1
2
3
4
5
6
7
8
9
10
11
<root>
<regex name="nameCheck>qr/tr0nix/</regex>
<regex name="nrCheck>qr/^\d$/</regex>
<regex name="emptyCheck>qr/^$/</regex>
</root>
<root startAt="0">
<check id="0" onMatchAction="return">nameCheck</check>
<check id="1" onMatchCheck="2">nrCheck</check>
<check id="2" onMatchAction="return">emptyCheck</check>
</root>
Würde compiliert werden zu:
Code: (dl
)
1
2
3
4
5
6
7
8
9
10
11
12
13
my %regex;
$regex[nameCheck]="qr/tr0nix/";
$regex[nrCheck]="qr/^\d$/";
$regex[emptyCheck]="qr/^$/";
sub check {
my $line = shift;
return if ($line =~ $regex[nameCheck]);
if ($line =~ $regex[nrCheck]) {
return if ($line =~ $regex[emptyCheck]);
}
}
P.S. danke für den Tipp mit $foo in deinem letzten Beitrag, habs abonniert und schon das erste Magazin erhalten! Echt cooles Design!