Re: File::ShareDir and development?

[Gabor Szabo]

On Tue, Apr 1, 2014 at 7:55 PM, Karen Etheridge <p...@froods.org> wrote:
>
> https://metacpan.org/pod/Test::File::ShareDir


thanks. That looks good for test run, but not for running the application
in the development environment.

I ended up with this heuristics:

use File::ShareDir qw(dist_dir);
my $path_to_skeleton = dist_dir('Webber') . "/Skeleton";
if (-e 'share' and -e 'lib/Webber.pm') {
        $path_to_skeleton = 'share/Skeleton';
}

where Webber.pm is the main module of the application.


Gabor