Beefy Boxes and Bandwidth Generously Provided by pair Networks
Perl-Sensitive Sunglasses
 
PerlMonks  

Make Love, not war...

by Asmo (Monk)
on Sep 17, 2001 at 23:24 UTC ( [id://112935]=obfuscated: print w/replies, xml ) Need Help??

@h1=("74", "117", "115", "116", "32", "65", "110", "111", "116", "104", "101", "114", "32", "80", "101", "114", "108","32", "72", "97", "99", "107", "101", "114"); foreach $haha (@h1) {$i++; $b++; $p++; $k++; $q++; $s++; $t++; $u++; $v++; $w++; $owow = chr($haha); print $owow;}


No, i'm not a hippie, or one of those peace'n'love guy...

heh...


I'm just trying to make 'beatiful' (??) things with my very little coding abilities...


@j=split(/2/,"65211521092111");foreach$k(@j){print chr($k);}

Asmo

Replies are listed 'Best First'.
Re: Make Love, not war...
by damian1301 (Curate) on Sep 17, 2001 at 23:59 UTC
    • That's not a peace sign, that's an upside-down mercedes bens sign.
    • All of your "obfuscations" all do the same thing - get numbers and convert them to text using chr. It has been done and it is getting really old.


    UPDATE: I understand that I shouldn't have been so negative and should've encouraged you instead. I am honestly sorry. To get you going on a better track try looking through some obfuscation reviews by japhy

    _______________________________________________________
    s&&q+\+blah+&oe&&s<hlab>}map{s}&&q+}}+;;s;\+;;g;y;ahlb;veaD;&&print;
      Side note: There have been a number of variations of the so-called 'peace sign', and at least one of them looked like the one in this thread, either because it was yippie-influenced or because it corresponded to the 2-finger peace 'gesture', or maybe both.
        well, when i saw damian's reply, i though 'huh, he might be right' then i searched a little bit, and, they are actually, different version of 'the' peace sign...

        Thx for your reply.

        Asmo
      • I agree with your first (despite your horrendous spelling of "Benz")
      • Give Asmo a break. OK, so s/he likes chr. Someone piss in your cereal this morning?
      This ain't the first time you jumped on some newbie. You ever think it's your attitude that's getting really old, you little weasel?
    A reply falls below the community's threshold of quality. You may see it by logging in.
Re: Make Love, not war...
by stefp (Vicar) on Sep 19, 2001 at 13:52 UTC
      I think the issue was how many branches there are (i.e. the peace sign that I know of has four spokes coming out from the center, whereas this obfu and mercedes logo only have three.

      -Blake

Re: Make Love, not war...
by thunders (Priest) on Sep 24, 2001 at 19:53 UTC
    just a quick tip,
    after you set up your array, the important part of your foreach loop could be rewritten like so:

    for(@h1){$_=chr;print}

    get to know the $_ special variable. it'll save you tons of typing and redundant statements. also, the for and foreach loops are interchangable. Any place you can use one you can use the other. example:
    foreach ($i=0;$i < 10;$i++){do something}
    for is three characters foreach is seven, guess which one most Perl programmers use :)
    hint: think lazy

      Perhaps the choice of using the code the programmer did is based on the aesthetic layout?

      While you are at it? Why bother reassigning the result of chr to $_? Just drop that line alltogether to get  for(@h1){ print chr; } and of course if your decision is to be based on the number of characters you can go to print chr for(@h1); but getting the smallest WTDI is golf and not obfuscation.

        I'd personally use:
        print map chr, @h1;
        But to each their own. I was just offering some advice.
Re: Make Love, not war...
by basicdez (Pilgrim) on Sep 18, 2001 at 20:00 UTC
    I think this is beautiful. thanks for sharing. peace, lOVE and ((stuff)) dez L

Log In?
Username:
Password:

What's my password?
Create A New User
Domain Nodelet?
Node Status?
node history
Node Type: obfuscated [id://112935]
Approved by root
help
Chatterbox?
and the web crawler heard nothing...

How do I use this?Last hourOther CB clients
Other Users?
Others studying the Monastery: (5)
As of 2024-03-19 08:16 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    No recent polls found