perl cgi - 更改临时上传文件的位置

Question

将现有脚本移动到新服务器后，某个功能不再起作用了：

$CGITempFile::TMPDIRECTORY = $TempFile::TMPDIRECTORY = $temp_dir;

我发现：“临时文件处理的变化（v4.05 +）：CGI.pm的临时文件处理显着重构，这个逻辑现在全部推迟到File :: Temp [...]”你完全可以在这里阅读：Link to CGI doc

因此，我搜索了File :: Temp（以及许多论坛）的文档，但没有发现如何更改临时文件的路径。

任何帮助都将受到高度赞赏！

P上。 S.对于上下文，它看起来像这样

use CGI::Carp qw(fatalsToBrowser);
use CGI;
[...]
$CGITempFile::TMPDIRECTORY = $TempFile::TMPDIRECTORY = $temp_dir;
[...]
my $cg = new CGI;

Answer 1

非常感谢，Сухой27，对于你的评论，解决方案非常简单（一旦你知道了）我只是将上面的代码替换为：

$ENV{TMPDIR}=$temp_dir;