Select Code to Download

#!/usr/bin/perl
use warnings;
...

say 'MyObj'->new('obj1')->string;
say new MyObj('obj2')->string;

obj1
obj2

obj1
Undefined subroutine &main::MyObj called at ... line 9.