%ENV is tainted, meaning $ENV{TEMP} and what not is tainted ...

$ perl -Te "$f=$ENV{TEMP}.q{/junk}; open my($fh), q{>}, $f; "
Insecure dependency in open while running with -T switch at -e line 1.
[download]

In your program write  $ENV{TEMP}='...'; or untaint the other way