perl -MO=Showlex[,sub] filename

If sub is provided and is the name of a subroutine in file filename, B::Showlex prints the lexical variables used in that subroutine. Otherwise, it prints the file-scope lexicals in filename.

8.19. B::Lint		8.21. B::Stackobj