package C;
use strict;
use warnings;
sub new { bless({}, shift)-> moo };
sub moo { print "C::moo\n"; }
1;