[forwarded submission mistaken for admin request -- rjk]
From: Greg London <[EMAIL PROTECTED]>
Date: Fri, 22 Feb 2002 12:27:38 -0500
Subject: Re: [Boston.pm] obfuscation/compiler/summary
CC: [EMAIL PROTECTED]
wow, it really IS a lot harder than I thought.
I just uploaded a rough obfuscator perl script
to my CPAN account. obfuscator-0.001.pl
you should be able to download it in a little while.
my $vars
and
sub mysub
declarations are changed to identifier names
that are meaningless.
this:
use Tk;
my $top = MainWindow->new();
$top->title("hey you");
my $hello_text = $top->Label( text => 'hello world');
$hello_text->pack();
MainLoop();
is obfuscated to this:
use Tk;
my $baa = MainWindow ->new();
$baa->title("hey you");
my $bab =$baa->Label( text =>'hello world');
$bab->pack();
MainLoop ();
the obfuscated code runs as usual.
the script doesn't handle my ($var, @var)
or double quoted strings with vars inside them.
yet.
I ran it on a Tk demo program I have,
with a bunch of widgets, and it worked
on that too. the obfuscated code looks
like a nightmare.
anyway, its on CPAN if you wanna look at it.
I just wanted to see how hard it was to do it
my way.
Greg
