use Devel::Peek; Dump $File::Find::name; Dump $File::Find::dir;