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

[Edgar Fuß]

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.