Yes, that might be a better way of doing it. I've done something similar, setting up a SOAP server using Win32::Daemon and SOAP::Lite.

Simon Flack ($code or die)
$,=reverse'"ro_';s,$,\$,;s,$,lc ref sub{},e;$,
=~y'_"' ';eval"die";print $_,lc substr$@,0,3;