Select Code to Download

perl -E '
use v5.36;
...
my $x= bless \{ foo => 2 }, "main";
say $x->foo;
'

perl -E '
use v5.36;
...
my $x= main->new(foo => 2);
say $x->foo;
'