Not a perl solution but tcpTrace would allow you to view the interaction between the client script and the POP server.

Regards,
Dom.