package Foo; @ISA = qw(Bar);