Select Code to Download

use File::Basename 'dirname';

...
   croak "Can't find $filename" unless -f $filename;
   ...
}

sub find_config {
   my $filename = shift;
...

my $filename = find_config("acme.conf", @INC, "/also/search/here", "/a
+nd/here")
   or die "Couldn't find acme.conf!";