CGI.pn: misprint in find_tempdir subroutine [rt.cpan.org #95635]

[leejo]

https://rt.cpan.org/Ticket/Display.html?id=95635

Hello,

I've found a misprint in the CGI.pm module in find_tempdir subroutine:

4205c4205
<       do {$TMPDIRECTORY = $_; last} if -d $_ && -w _;

---
 >       do {$TMPDIRECTORY = $_; last} if -d $_ && -w $_;

-- 

Best regards,
Maxim Krayushin

e-mail: m.krayushin@net-probe.ru
skype:  voodoovin
web:    www.net-probe.ru

[leejo]

mark@stosberg.com - 2014-05-14 12:56:08

< do {$TMPDIRECTORY = $; last} if -d $ && -w _;

  do {$TMPDIRECTORY = $_; last} if -d $_ && -w $_;

The existing code is correct and in fact better because it will run a
bit faster.

If you had creating a test case before you submitted, you would have
seen that the existing code works as expected.

See

perldoc -f -X

And scroll to the bottom to see "_" explained.

 Mark

[leejo]

Closing as per reason explained above.