package MyConf { use constant NOSE => q(cuke); use feature qw(say); say __PACKAGE__; 1; } #### #!/usr/bin/env perl use strict; use warnings; use feature qw(say); use lib q(.); use MyConf; say qq(My nose isa @{[MyConf::NOSE]}!); __END__