[perl #69388] result of $obj.^can make say() silently abort

[Will Coleda via RT]

On Fri Sep 25 09:10:07 2009, moritz wrote:
> Program:
> 
> class B {
>     multi method B_method() {
>         say "in B::B_method";
>     }
> }
> 
> my $obj = B.new();
> 
> say $obj.HOW.can($obj, 'B_method');
> say "alive";
> say $obj.^can('B_method');
> say "alive";
> 
> 
> Output:
> __START__
> alive
> alive
> __END__
> 
> Both say() lines with calls to 'can' don't even print the newlines.
> 
> Cheers,
> Moritz

Output of this program is now:

B_method
alive
B_method
alive



-- 
Will "Coke" Coleda