Beefy Boxes and Bandwidth Generously Provided by pair Networks
Your skill will accomplish
what the force of many cannot

perl hit by a tornado.

by marko (Beadle)
on Jun 28, 2000 at 21:55 UTC ( #20219=obfuscated: print w/replies, xml ) Need Help??

my $counter = 3; my $dec_size=""; my $nodigits=""; my $onedigits = "0"; my $twodigits = "00"; my $threedigits = "000"; my $fourdigits = "0000"; for ($i = eval($counter) ; $i>1; $i--) { if ($i > 1000) #:) {if ($i > 9999) { $dec_size = $nodigits } else {$dec_size = $onedigit;}} else # its less than 1000 { if ($i < 100) {if ($i < 10){ $dec_size = $fourdigits; } else {$dec_size = $threedigits;} ;} else { $dec_size = $twodigits; } } }

Replies are listed 'Best First'.
RE: perl hit by a tornado.
by BBQ (Deacon) on Jun 30, 2000 at 20:31 UTC
    The format looks cool! But it doesn't output and its not really obfuscated. I'd work on those two a bit more... Maybe print out "woooosh" or something of the sort, and rename the variables (maybe hash them, add regex with the x modifier) so that it isn't so readable.

    # Trust no1!

Log In?

What's my password?
Create A New User
Node Status?
node history
Node Type: obfuscated [id://20219]
Approved by root
[Your Mother]: Please don't fight, mom and dad!
[erix]: friction gives warmth!
LanX comes back ...
[LanX]: FIGHT?
LanX orders pop corn
[erix]: ha ha, you missed it

How do I use this? | Other CB clients
Other Users?
Others avoiding work at the Monastery: (5)
As of 2018-03-19 21:24 GMT
Find Nodes?
    Voting Booth?
    When I think of a mole I think of:

    Results (246 votes). Check out past polls.