| Subject: | Safe->new pollutes main namespace with "main::" blank vars |
Minimized test case:
use Test::Routine::Util;
use Test::Routine;
use Safe;
Safe->new;
run_me;
The problem is that $default_share has some faulty logic with its version checks. If the version check fails, the false value still counts as "", not (). So, you end up with "" values in the array. When $obj->share_from gets that list, it gets a blank variable and inserts that into main as "main::". Package::Stash and Class::MOP hate this and croaks.