If can be handy it fails on many Strawberry flavours, with different File::Temp version.

-T -MFile::Temp=tempfile -wE "use Config; print qq(Perl $^V on $^O arc
+h $Config{archname} File::Temp v. $File::Temp::VERSION\n);my $fh = te
+mpfile();" 


  ----------------------------------------·······
 | Error in tempfile() using \XXXXXXXXXX: Could not create temp file
 | \A3pfFkxOIt: Permission denied at -e line 1
 |  Perl v5.14.2 on MSWin32 arch MSWin32-x86-multi-thread File::Temp v
+. 0.22
  --------------------------------------------------------------------
+---·······
  

  ----------------------------------------·······
 | Error in tempfile() using template \XXXXXXXXXX: Could not create te
+mp file
 | \tIFifxB347: Permission denied at -e line 1.
 |  Perl v5.20.0 on MSWin32 arch MSWin32-x86-multi-thread-64int File::
+Temp v.
 | 0.2304
  --------------------------------------------------------------------
+---·······
 

  ----------------------------------------·······
 | Error in tempfile() using \XXXXXXXXXX: Could not create temp file
 | \dr3rzHf4Yp: Permission denied at -e line 1.
 |  Perl v5.16.2 on MSWin32 arch MSWin32-x64-multi-thread File::Temp v
+. 0.22
  --------------------------------------------------------------------
+---·······
[download]

..while it runs OK on an ancient 5.8 ActiveState
L*