So Autrijus said, that it should come here. Sorry for crossposting.
-------- Original Message -------- Subject: PGE error? Date: Fri, 10 Jun 2005 10:29:17 +0200 From: BÁRTHÁZI András <[EMAIL PROTECTED]> To: perl6-language@perl.org <perl6-language@perl.org> Hi, I don't know what happens and where in the code, but... Anyway, it's strange... I have this code and input.tpl: --------------- 8< ------------------- rule sp { <[ ]> } rule id { <[a..z]><[a..z0..9]>+ } sub do($match) { say $match[0]; return "+"; } my $template=slurp('input.tpl'); $template ~~ s:g! [ \< server \: (<id>) [<sp>+ $?id:=(<id>) <sp>*=<sp>*"(<-["]>*)"]* <sp>* \> (.*?) \<\/ server \: $0 \> ] | [ \< server \: (<id>) [<sp>+(<id>)<sp>*=<sp>*"(<-["]>*)"]* <sp>* \/\> ] !{ do($/) }!; say $template; --------------- 8< ------------------- text <server:foo /> <server:huh /> text <server:boo> inside <server:huh /> inside </server:boo> text --------------- 8< ------------------- Running it several times, one time works: matches and replaces </> things to +-es, one time it not works... Randomly. Where should I send these kind of bugs? Bye, Andras