I don't think that there is a tool to do that; using strict and warning will help find variables which aren't declared, but won't find variables that are declared but not used. The walksymboltable routine in B may permit you to do that, but it may be more trouble than it's worth. Devel::Refactor may also help, in that its refactored code may have unused variables removed.