The Perl and Raku Conference 2025: Greenville, South Carolina - June 27-29 Learn more
1234567891011121314151617 use Test::More 'no_plan';package Problem;use Class::Std::Fast;# overload seems to interfere with overloading coercionssub as_string : STRINGIFY { return 'string'; }package main;our $obj;BEGIN { $obj = Problem->new(); ok("$obj");}ok("$obj");
use
Test::More
'no_plan'
;
package
Problem;
Class::Std::Fast;
# overload seems to interfere with overloading coercions
sub
as_string : STRINGIFY {
return
'string'
; }
main;
our
$obj
BEGIN {
= Problem->new();
ok(
"$obj"
);
}