Help for this page

Select Code to Download

Select or download this

use overload ...;
my $n = bless {number => 23}, "main";
print $n >> 2;