# Bar package Bar ; use strict ; use warnings ; use base qw( Foo ) ; 1 ;