| Subject: | Breaks eval in an END block in Win32 pseudo-forks |
If indirect is loaded (import doesn't need to be called), having a string eval in an END block will crash perl if triggered in a Win32 pseudo-fork. By default, pseudo-forks won't run END blocks, but they will if exit is called in them manually. I couldn't find a way to reproduce this using the threads module.
This can be demonstrated with the following script:
require indirect;
END { eval "1" }
exit if !fork;