Patched version of Net::LPR

Please refer to discussion on PDA Street forums - http://www.pdastreet.com/forums/showthread.php?s=&threadid=7281

The standard Net::LPR module does not work under EPOC because the getpwuid function and ReuseAddr socket property are not supported.

The attached version below wraps the getpwuid call in an eval(), defaulting to 'root' if a real username cannot be found. Setting of ReuseAddr has simply been removed.

To install the module, copy LPR.pm to ?\perl\lib\site_perl\5.6.1\Net\LPR.pm on your EPOC device.

  • LPR.pm: Patched version of Net::LPR