use strict; use warnings; use Blarney; package Foobar; use constant STR => 'quack'; use Data::Dumper; use base 'Quux';