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