segfault with rlm_perl