If things weren't accessible, how would you find them? At least in pure Perl, this would be impossible. You could iterate over all the symbol tables, following references to reachable objects, but this wouldn't find things that had leaked.