package foo;
sub new {
	return(bless({}, shift));
}
foo->new()->new(); #extra new!