Hi

Can I encrypt our perl script by using these codes?
I need suggestion that it's safe or not do encrypt and decrypt our .pl or .plx 
file with this code.

my $obscure =  pack("u",$_);

my $unobscure = unpack(chr(ord("a") + 19 + print ""),$obscure);

Kanhaiya Prasad
_______________________________________________
Perl-Win32-Users mailing list
Perl-Win32-Users@listserv.ActiveState.com
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs

Reply via email to