Random keyboard input. Almost.

s ss\sgi;sgi;y ygsyajy if m msgi;m ;y ji;jphj;print
[download]

Making all weird regexp-delimiters to /, you get:

s//sgi;/sgi; /y/gs/aj/ if m/sgi;; y/i;/ph/; print
[download]

Adding some additional clarification, you get:

$_ =~ s//sgi;/sgi;    # $_ is now 'sgi;'
if($_ =~ /sgi;/){
  $_ =~ tr/gs/aj;  # 'jai;'
}
tr/i;/ph/;         # 'japh'
print $_;          # Voila!
[download]

Comment on Random keyboard input. Almost. Select or Download Code

Replies are listed 'Best First'.
Re: Random keyboard input. Almost. by blakem (Monsignor) on Aug 26, 2001 at 16:45 UTC
Very nice... I obfued your obfu, though. Take a look. `perl -le 's ss\sgi;sgis;y ygsyajy if m msgi;m;y ji;jphjds;print'` [download] -Blake	[reply] [d/l]
Re: Random keyboard input. Almost. by Chady (Priest) on Aug 26, 2001 at 23:52 UTC
looks just like japhy's 2nd obfuscation review to me. He who asks will be a fool for five minutes, but he who doesn't ask will remain a fool for life. Chady \| http://chady.net/	[reply]
Re: Re: Random keyboard input. Almost. by Anonymous Monk on Aug 27, 2001 at 01:05 UTC
Your right, they are almost identical. It's what inspired me to start JAPHing, and i guess it inspired me _too_ much. Sorry japhy. :)	[reply]