This is my first obfuscation script. It's not so good, but it has some particular features. First, the whole octal codes are in a rectangular shape. Second, the last part of the script is also printed, either if it is just a semicolon followed by a comment.
#!/usr/bin/perl
#$mile by throttle
my $mile = "\040\040\040\040\040\040\040\040\040\040\040\137\000\137\1
+37\137\137\137\137\137\137\137\000\137\137\137\137\137\137\137\137\13
+7\137\000
\040\040\040\040\040\040\040\040\040\040\000\057\040\040\040\040\040\0
+40\000\040\000\040\040\000\040\040\040\040\040\040\040\040\040\040\04
+0\134\000
\040\040\040\040\040\040\040\040\040\057\040\040\040\040\040\000\040\0
+40\040\040\040\040\040\040\040\040\000\000\040\040\040\040\040\040\04
+0\134\000
\040\040\040\040\040\040\040\040\057\040\040\040\040\040\040\137\137\0
+40\040\000\040\040\040\040\040\137\137\040\040\000\040\040\040\040\04
+0\134\000
\040\040\040\040\040\040\040\057\040\040\040\040\040\040\057\040\040\1
+34\040\040\040\040\040\057\040\040\134\040\040\040\000\040\040\040\04
+0\134\000
\040\040\040\040\040\040\057\040\040\040\040\040\040\040\134\137\137\0
+57\040\040\040\040\040\134\137\137\057\040\040\040\040\040\040\040\04
+0\134\000
\040\040\040\040\040\040\174\040\040\040\040\040\040\040\040\040\040\0
+40\040\040\040\040\040\040\040\040\040\040\040\040\040\040\040\040\04
+0\174\000
\040\040\040\040\040\040\174\040\040\040\040\040\040\040\040\040\040\0
+40\040\174\040\174\040\040\040\040\040\040\040\040\040\040\040\040\04
+0\174\000
\040\040\040\040\040\040\174\040\040\040\040\040\040\040\040\040\040\0
+40\040\134\137\057\040\040\040\040\040\040\040\040\040\040\040\040\04
+0\174\000
\040\040\040\040\040\040\174\040\040\040\040\040\134\040\040\040\040\0
+40\040\040\040\040\040\040\040\040\040\040\040\040\057\040\040\040\04
+0\174\000
\040\040\040\040\040\040\134\040\040\040\040\040\040\134\040\040\040\0
+40\040\040\040\040\040\040\040\040\040\040\040\057\040\040\040\040\04
+0\057\000
\040\040\040\040\040\040\040\134\040\040\040\040\040\040\134\137\137\1
+37\137\000\137\137\137\137\137\137\137\137\137\057\040\040\040\040\04
+0\057\000
\040\040\040\040\040\040\040\040\134\040\040\040\040\040\040\000\000\0
+40\040\040\040\040\040\040\040\040\040\040\040\040\040\040\040\040\04
+0\057\000
\040\000\040\040\040\040\040\040\040\040\000\134\040\040\040\040\040\0
+40\040\040\040\040\040\040\040\040\040\040\040\040\040\040\040\040\05
+7\000\000
\040\040\040\040\040\040\040\040\040\040\134\137\000\137\137\137\137\1
+37\000\137\137\137\137\000\137\137\000\137\137\137\137\137\137\137\13
+7\057\000
\012\044\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\0
+00\000\000\155\000\151\000\154\000\145\041\040\000\073\000\043\051\00
+0\012\000
"
;#)
print $mile;
Look at the output and... SMILE!
