Hello,
Looking at the first example in "Using Perl6", I have:
if $r1 > $r2 {
%matches{$p1}++;
} else {
%matches{$p2}++;
}
I was thinking that it should be possible to make this more compact, but the
two ideas I tried didn't work:
# Idea 1 gives: Unable to parse postcircumfix:sym<{ }>, couldn't find final
'}'
%matches{ $r1 > $r2 ? $p1 : $p2 }++;
# Idea 2 gives: Unable to parse blockoid, couldn't find final '}'
$r1 > $r2 ? { %matches{$p1}++ } : { %matches{$p2}++ };
Is there a way to make something along these lines work?
Daniel.
--
No trees were destroyed in the generation of this email, but a large number
of electrons were severely inconvenienced.
