This works:
rule name { Larry | Matz | Guido }
rule project { Perl | Ruby | Python }
rule description { <name> \s does \s <project> }
'Larry does Perl' ~~ /<description>/; # true
'Larry does Java' ~~ /<description>/; # false
This too:
class Point {
has $.x;
has $.y;
method show () { say "Coordinate: ($.x, $.y)" }
method set ($x, $y) { $.x = $x; $.y = $y }
}
my $pt = Point.new(:x(10), :y(20));
$pt.show; # Coordinate: (10, 20)
my $pt2 = $pt.clone;
$pt.set(30, 40);
$pt.show; # Coordinate: (30, 40)
$pt2.show; # Coordinate: (10, 20)
say(($pt ~~ Point).perl); # bool:true
say(($pt ~~ Hash).perl); # bool::false
Pugs's Parrot codegen backend needs to be updated to reflect both of
them, but the basics are there. May the hackings commence. :)
Thanks,
/Autrijus/
|
|
application_pgp-signature_part
< 1K
Download
|
|
