if you want to obfuscate your code, why not use the tried and true obfucation method and pack up your source code doing something like:

my $retval = pack("H*", $perlscript);
[download]

Then, to you execute it, unpack it then eval it.

If you wanted to be really tricky you could create a cool serial number routine and embed it in your packed code...