Use of uninitialized value $1 in split at
/usr/local/lib/perl5/5.12.1/Module/Pluggable/Object.pm line 196,
<PKGFILE> line 1.
The input that triggers the failure is: "package TopLevel;"
fix:
--- @pkg_dirs = split /::/, $1;
+++ @pkg_dirs = split /::/, $1 if defined $1;