Well... the first obfuscation looks ugly, but if you change this part:

eval scalar reverse;

to this:

print scalar reverse;

You see the 'code' in that obfuscation... but then you notice that some funky stuff happens to the DATA section... becuase it too is an obfuscation (not as cool as the one you actually see, but neat anyhow)... to see that code, change what you printed out above where it says:

eval $ndk;

to:

print $ndk;

So there's two obfuscations in one.

--
Casey