After anylyzing the code, I realized why this is
notsogood. The reason is that the actual code in the obfuscation is very simple and most of the "obfuscation" is really ASCII art. If you strip it of the art you get these 7 lines:
$_='$;JustAnotherPerlHacker'; # assign '$;JustAnotherPerlHacker' to $_
$_=reverse; # reverse it
chop; # chop the '$' off
chop; # chop the ';' off
$_=reverse; # unreverse it
s/([JAPH])/$".lc($&)/ge; # put spaces before the letter J,A,P,H and ma
+ke them lowercase
print; # print it
Good obfuscated code should have the code hard to read and not be difficult to read because it is surrounded by a bunch of random characters. This is also the reason why strict and -w don't work here. I don't want to sound insulting or offensive, it's just that I want to show people how to make their obfuscations better.
Zenon Zabinski | zdog | Zenon.Zabinski03@students.bcp.org