So kannst Du Dir die Logik von Deinem Programm anzeigen lassen. Ist zwar nicht Dein Original-Quelltext, aber besser als nur das Verschlüsselte zu haben:

perl -MO=Deparse sript.pl