<div dir="ltr"><div><div><div><div><div><div><div>Hallo, Leute!<br><br></div>Ich spiel mich immer noch mit perl6 rum, was soll ich sagen, es macht einfach Spaß...<br><br></div>Gerade macht mir aber ein Problem zu schaffen, wieder mal Grammars:<br><br></div>use v6;<br><br>grammar message {<br>    token TOP { <tokenstart> <message> }<br>    token tokenstart { \<message\> }<br>    token message { .*? <.tokenend> }<br>    token tokenend { \<\/message\> }<br>}<br><br>my $rec = "<message>Ich bin eine Message</message><message>Ich bin eine Message</message><message>Ich bin eine Message</message><message>Ich bin eine Message</message><message>Ich bin eine Message</message><message>Ich bin eine Message</message>";<br><br>while my $match = message.subparse($rec) {    <br>    say ~$match<message>;<br>    $rec = $rec.subst($match, "");<br>}<br><br></div>Das funktioniert wie erwartet, allerdings ist <.tokenend> immer in $/<message> dabei. obwohl ich irgendwo gelesen habe, dass der . bewirkt das das nicht gespeichert wird. Gibt es einen anderen Weg das zu erreichen? Gibt es vielleicht sowas wie <!tokenend>, damit alles außer <tokenend> gefunden wird?<br><br></div><div>Danke und Grüße,<br></div><div>Wolf<br></div></div><br></div></div>