# New Ticket Created by "Dave Whipp"
# Please include the string: [perl #61918]
# in the subject line of all future correspondence about this issue.
# <URL: http://rt.perl.org/rt3/Ticket/Display.html?id=61918 >
<dwhipp> rakudo: class A { has $.foo }; my A $a .=new( foo => 42
); say $a.perl
<p6eval> rakudo 34835: OUTPUT«Method 'perl' not found for
invocant of
class 'A'current instr.: '_block14' pc 158 (EVAL_13:73)»
<dwhipp> pugs: class A { has $.foo }; my A $a .=new( foo => 42
); say $a.perl
<p6eval> pugs: OUTPUT«\A.new((\("foo", 42),)»