working rlm_perl example

Hi there, does anyone have a working example of rlm_perl authenticating a user???? I have tried the example.pl and it still gives me a access-reject message. TIA