a82cae
diff -up Storable/Storable.pm.cve Storable/Storable.pm
a82cae
--- Storable/Storable.pm.cve	2016-03-19 19:50:47.000000000 +0100
a82cae
+++ Storable/Storable.pm	2016-08-03 12:48:36.415082280 +0200
a82cae
@@ -25,7 +25,13 @@ use vars qw($canonical $forgive_me $VERS
a82cae
 $VERSION = '2.56';
a82cae
 
a82cae
 BEGIN {
a82cae
-    if (eval { local $SIG{__DIE__}; require Log::Agent; 1 }) {
a82cae
+    if (eval {
a82cae
+        local $SIG{__DIE__};
a82cae
+        local @INC = @INC;
a82cae
+        pop @INC if $INC[-1] eq '.';
a82cae
+        require Log::Agent;
a82cae
+        1;
a82cae
+    }) {
a82cae
         Log::Agent->import;
a82cae
     }
a82cae
     #