diff -up Module-CoreList/corelist.cve Module-CoreList/corelist
--- Module-CoreList/corelist.cve	2016-02-05 16:26:05.000000000 +0100
+++ Module-CoreList/corelist	2016-08-05 09:16:43.129306210 +0200
@@ -130,6 +130,7 @@ requested perl versions.
 
 =cut
 
+BEGIN { pop @INC if $INC[-1] eq '.' }
 use Module::CoreList;
 use Getopt::Long qw(:config no_ignore_case);
 use Pod::Usage;