cd /d e:\windows

cd /d c:\

find({ no_chdir => 1, wanted => sub { print if -d } }, 'E:' );