use strict;
package Foo;
use isa qw(Bar);
sub new { bless {},shift }