random questions on rlm_perl.c (was: rlm_perl and threads)

Digging through the rlm_perl source, I stumbled over the following: 1. Is it on purpose that it normally checks USE_ITHREADS and only perl_xlat checks WITH_ITHREADS? 2. Is it also on purpose that radiusd::radog is newXS'd only after perl_parse()? That hit me because as it is, you can't log anything (like a version number) inside the script's body/main program (or call it initialization routine). 3. I also noticed that tests like #if PERL_REVISION >= 5 && PERL_VERSION <8 would trigger for 6.0 if that is ever going to happen.