C:\>set TMPDIR=C:\Temp

C:\>set TEMP=C:\Temp

C:\>perl -MFile::Spec -e "print File::Spec->tmpdir();"
\

C:\>perl -MFile::Spec -e "print $File::Spec::VERSION;"
3.40