Beefy Boxes and Bandwidth Generously Provided by pair Networks
The stupid question is the question not asked
 
PerlMonks  

First JAPH

by Feland (Novice)
on Jun 17, 2014 at 14:32 UTC ( #1090151=obfuscated: print w/ replies, xml ) Need Help??

This is my (oh !!) first JAPH. I'm a little newbie at this place, but I hope that is not too bad :) Please, comment !

&p(qw(Ju));$x= $/;$|=$$;$,=$/;$\=$!; sub T{eval$_[0]};sub su{T q%sel%.q +ect *a,* a,*+.'a, .06';}sub p{T(q;p;. q 5ri5.q qntq)for @_}map{p ('u');& su;}(1.. 17);sub s{+$_[0] };&s(&su );$a='rl' ;$\=$x;&s(&p("st"));$\=$!;&s (&su);sub r($;){+p($_[0] )};p(q-A-);sub z{$\=$/?$;: $,;$,=$;;su();map{&s(p('a'));& s(su);}@_};z((1..7));$,=$x;$\=$, ;$"=$\;$,=$/; $_=q!!;s;;;; p(q qnoq.q rthe\rr);$\ =$/?$;:$,;$ ,=$;;;;su(); r "P";map{r "e";&s||&su; }(1..42);$\ =$;;&s(p($a) );T(T(su())); r $/;r "H";$\ =$/?$;:$,;$/=$,;z(1..12);$,=$\;$\ =$/;$a=~s/(.)l//;p(q tcket.$1 );&s(p($"));$e='Felicien'; #MYFIRSTJAPH

Comment on First JAPH
Download Code
Re: First JAPH
by Tux (Monsignor) on Jun 17, 2014 at 14:39 UTC

    Nice, but I doubt if this was your intention:

    Juuuuuuuuuuuuuuuuuust Aaaaaaaanother Peeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeerl Haaaaaaaaaaaacker

    Enjoy, Have FUN! H.Merijn
      It was exactly my intention :)
Re: First JAPH
by thomas895 (Hermit) on Jun 17, 2014 at 20:09 UTC

    Not quite working here. When copy-pasted to here, I get the intended result. But when it appears on the tty, I get a lot of strange symbols, as in:

    Juuuuuuuuuuuuuuuuuust
    Aa^\a^\a^\a^\a^\a^\ather
    P^\e^\e^\e^\e^\e^\e^\e^\e^\e^\e^\e^\e^\e^\e^\e^\e^\e^\e^\e^\e^\e^\e^\e^\e^\e^\e^\e^\e^\e^\e^\e^\e^\e^\e^\e^\e^\e^\e^\e^\e^\e^\e^\rl
    ^\H^\a^\a^\a^\a^\a^\a^\a^\a^\a^\a^\a^\a^\cker
    

    ...but only on the XFCE terminal. On XTerm, it appears just fine.
    This is on 5.16.2, i586-linux-thread-multi.

    ~Thomas~ 
    "Excuse me for butting in, but I'm interrupt-driven..."
Re: First JAPH
by eyepopslikeamosquito (Canon) on Jun 18, 2014 at 07:24 UTC
Re: First JAPH
by ambrus (Abbot) on Jun 19, 2014 at 05:57 UTC

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: obfuscated [id://1090151]
Front-paged by Corion
help
Chatterbox?
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others lurking in the Monastery: (8)
As of 2014-07-23 04:12 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    My favorite superfluous repetitious redundant duplicative phrase is:









    Results (133 votes), past polls