Lines Matching refs:Baz
55 @ISA = 'Baz';74 package Baz;76 sub a { 'a Baz' }77 sub b { 'b Baz' }78 sub c { 'c Baz' }142 # get Baz::b143 print "not " unless $bar->b() eq 'b Baz';146 # There is no Bar::c so we should get Baz::c147 print "not " unless $bar->c() eq 'c Baz';158 print "not " unless $bar->c() eq 'c Baz';