diff --git a/Digest.pm b/Digest.pm index c3355a8..b2f1ee1 100644 --- a/Digest.pm +++ b/Digest.pm @@ -38,7 +38,11 @@ sub new unless (exists ${"$class\::"}{"VERSION"}) { my $pm_file = $class . ".pm"; $pm_file =~ s{::}{/}g; - eval { require $pm_file }; + eval { + local @INC = @INC; + pop @INC if $INC[-1] eq '.'; + require $pm_file; + }; if ($@) { $err ||= $@; next;