read value of host-ip in perl-module (freeRADIUS 2.2.0)

[Wolfgang Burger]

Dear people,

as you can see in this Access-Request:

rad_recv: Access-Request packet from host 10.1.4.82 port 65201, id=37,  
length=79
        User-Name = "test"
        User-Password = "testpass"
        NAS-IP-Address = 10.0.2.15
        NAS-Port-Type = Virtual
        NAS-Port = 1228
        Calling-Station-Id = "10.0.2.15"
        Service-Type = Login-User


the client is entering incorrect data into the field "Calling-Station- 
Id".
In the setup used, it should not differ from the host.
But "10.0.2.15" != "10.1.4.82"

Authentication is handled by a perl-module.
The outcome of the module depends on the host sending the packet.

How (if at all) can I access the value of "host" (10.1.4.82 in the  
example above) from within the perl-module?

Many thanks and best regards,
  Wolfgang