Beefy Boxes and Bandwidth Generously Provided by pair Networks
"be consistent"


by leons (Pilgrim)
on Jan 18, 2001 at 17:27 UTC ( #52766=obfuscated: print w/replies, xml ) Need Help??

I admit, the idea is pretty simple and maybe the thing is
a bit cheesy ... however, it looks pretty weird which
made me decide it was worthwile posting. I hope it proves
me right ;-)

#!/usr/bin/perl -w use strict;; ;; ;;;;;; ;; open A,$0;;; ;;;;;;;;;;;; ;;;;;;;;push @_,$_ while <A>;;;;;;;;; ;;;;;;;;;;;; print chr( y/;/;/ -3<0? ord' ':y/;// + ord '^' ) foreach "@_" =~/;[;\s]+/g ;;;;;;;;;;;; ;; ;;;;;; ;; push @_,$_;; push@_,$_;;; push @_,$_;; ;;;;;;;;;;;; ;;push @_,$_ ;;;;;;;;;;;; ;;;;;push @_ ,$_;;;;;;;;; ;;;;;;;;;;;; ;push@_,$_;; ;;;;;;;;push @_,$_;;;;;;; push @_,$_;; ;;;;;;;;;;;; ;;;;;;push@_ ,$_;;push@_, $_;;;;;;;;;; ;;;;;;;;push @_,$_;;;;;;; push@_,$_;;; ;;;;;;;;;;;; ;;;;;push @_ ,$_;;;;;;;;; ;;;;;push@_, $_;;push @_,$_;;; ;;; ;;;; push @_ , $_ ;;; push @_, $_ ;;;;; push @_, $_;;;;;; ;;; ;;;; push @_, $_;;;;;; ;push@_, $_;push @_,"\n"; ;;;;;;; ;;;;;;; ;;; ;; print pop@_

After posting this, I decided that it might look a bit
better when i'd turn the shape from a square to a couple
of semi-colons ... so that's exactly what I did
I'm terribly sorry for the guys who voted for it and who
think it became a piece of crap now ;-)

Replies are listed 'Best First'.
Re: Semi-Colons
by turnstep (Parson) on Jan 19, 2001 at 05:52 UTC

    I actually almost posted something to the effect of "at least it isn't shaped into a giant ASCII semicolon." :) Very good effort, however. s/;;+/;/g; helps to decode this a bit. :)

Log In?

What's my password?
Create A New User
Node Status?
node history
Node Type: obfuscated [id://52766]
Approved by root
holli writes MonkLinks 2.0
[holli]: Just to have a look what all the fuzz about the new JS features is about
[holli]: tag auch. wir sind ja unter uns :)
[Corion]: Hi holli ;)
[Corion]: In a way, it's sad that Firefox kills off the add-on functionality... But, as n-gate usually writes, "Firefox tries to be more like Chrome"
[holli]: it's not always possible to do a complete rewrite without cutting off some pigtails
[Discipulus]: indeed! new firefox seems poorer: many tab crash, and you open this link in FF?

How do I use this? | Other CB clients
Other Users?
Others about the Monastery: (9)
As of 2017-11-20 19:00 GMT
Find Nodes?
    Voting Booth?
    In order to be able to say "I know Perl", you must have:

    Results (291 votes). Check out past polls.