Re: Path relative to package

[ikegami]

use Cwd            qw( abs_path );
use File::Basename qw( dirname );

my $dir_of_pm = dirname(abs_path(__FILE__));

BUT! This sounds like a job for File::ShareDir (or maybe File::HomeDir).