# In the file 'literal.pl' package Illumination; use strict; use warnings; use Data::Dumper; my %hash; $hash{__PACKAGE__}{__FILE__}{__LINE__} = "Mu Mu"; print Dumper \%hash;