This is my first obfuscation(?), not much of an obfuscation though; but I had the idea of a chinease writing today when I was going to univsersity and thought of doing something with it.

#!/usr/bin/perl -w

use strict;

$_ = "
###################

    J  A  P  H
    u  n  e  a
    s  o  r  c
    t  t  l  k
       h     e
       e     r
       r

###################
";
$_ = uc((split(/ /))[30]).lc((split(/ /))[10]).lc((split(/ /))[6]).chr
+(ord((split(/ /))[18])-1).chr(ord((split(/ /))[14])+4);s/\n//g;print;

[download]
He who asks will be a fool for five minutes, but he who doesn't ask will remain a fool for life.

Replies are listed 'Best First'.
Re: Chinease (sort of)
by tadman (Prior) on Apr 06, 2001 at 05:22 UTC
    What about processing the pseudo-Chinese style: 
    $_ = "
  ###################

      H  P  A  J
      a  e  n  u
      c  r  o  s
      k  l  t  t
      e     h
      r     e
            r

  ###################
  ";

    [download]
    Note: This node could probably be deleted. See this node. Ow. That hurt.
[reply]
[d/l]

Back to Obfuscated Code