The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.
package # hide from PAUSE indexer
 MFoo;
        use Moose;

        use MUser;
        use Data::Dumper;

        sub hello {
                my ($self, $u) = @_;
		#print STDERR Dumper($u);
                print "# HELLO ", $u->hotstuff, "\n";
        }

1;