1

Saurez-vous trouver quels sont les deux langages pour lesquels le code suivant est valide ? Plus dur : saurez vous expliquer ce qu'il fait ? ^^

/;{}def/#{def}def/$_={/Times-Bold exch selectfont}#/_{rmoveto}#/"{dup}#/*/!/$
;/q{exch}#/x ; {/J q #}#/.{/T q #}#{stringwidth}#{}#{}# 14 string dup dup dup
260 40 moveto 90 rotate ; %/}};$0='"\e[7m \e[0m"';@ARGV=split//,reverse
q(ThePerl). q(Journal) x 220 ; q ; 0 T putinterval exch 7 J putinterval ;
 ; $_= q /m$ pop T($*!$"=!$ " )pop " * true% ? $ " $!" "  !!  !! % !" !"    !
! charpath {!"""}pop $ pop{""!}pop ! neg{!#}pop 220 ! neg _{!!}pop J false %T
charpath  clip " pop 0 " moveto 6{!!}pop $_= 105{!!}pop {$ ! $ " !  #! ##}
pop{dup dup $ ! " pop pop q{"}pop 22{dup show}repeat {"}pop q 22 mul{$ "} pop
neg{!#! $ "}pop ! 8 .65 mul{$ # # $}pop ! neg{"}pop  _ pop{"}pop } repeat pop
" {  $ " ! ! ! $ " ! !" "#"  #"!"""""! #" " # "m/;@ARGV=(@ARGV[-14..-1])x50;q}
 0 "%};s/m[ou]|[-\dA-ln-z.\n_{}]|\$_=//gx;s/(.)(?{$*=''})/('$*.='.(++$#
%2?'':"$0;").'pop;')x(ord($1)-31).'$*'/gee;s/((.(\e\[.m)*|.){77})/$1\n/g;print
; sub showpage {}
avatar
I'm on a boat motherfucker, don't you ever forget

2

bien que je ne connaisse pas trop certais bouts de code me font penser a du perl. De la a dire ce que ca peux bien pouvoir faire eek
avatar

3

oué, ça ressemble à du Perl, sur certains point

et après vérification, c'en est ^^
quand à ce que ça fait : http://squalenet.net/extern/yn/the-perl-journal.png
(je suppose que ça fait la même chose dans l'autre langage, avec l'autre nom de langage ?)
avatar
Tutorial C (TI-89/92+/v200) - Articles Développement Web (PHP, Javascript, ...)
« What is the sound of Perl? Is it not the sound of a wall that people have stopped banging their heads against? » - Larry Wall

4

ah ff a du merder mon copy paste... ça devrait mieux marcher ici : http://mirari.info/get.php?c=X4Y8

pour l'autre langage c'est quand même pas si dur, y a plein de mots clés ^^
avatar
I'm on a boat motherfucker, don't you ever forget

5

c'est du postscript non ? (c'est un peu ultrafacile à reconnaître d'ailleurs effectivement ^^)
avatar
« Le bonheur, c'est une carte de bibliothèque ! » — The gostak distims the doshes.
Membrane fondatrice de la confrérie des artistes flous.
L'univers est-il un dodécaèdre de Poincaré ?
(``·\ powaaaaaaaaa ! #love#

6

yep
avatar
I'm on a boat motherfucker, don't you ever forget

7

hum le résultat de "gsview script.pl" est quand même nettement plus joli que celui de "perl script.pl" ^^
avatar
« Le bonheur, c'est une carte de bibliothèque ! » — The gostak distims the doshes.
Membrane fondatrice de la confrérie des artistes flous.
L'univers est-il un dodécaèdre de Poincaré ?
(``·\ powaaaaaaaaa ! #love#

8

Sally: pencil

marrant je connais pas le perle (mais je connais le PS) etonant que le perle accepte tout ça ^^
avatar
Proud to be CAKE©®™


GCC4TI importe qui a problème en Autriche, pour l'UE plus et une encore de correspours nucléaire, ce n'est pas ytre d'instérier. L'état très même contraire, toujours reconstruire un pouvoir une choyer d'aucrée de compris le plus mite de genre, ce n'est pas moins)
Stalin est l'élection de la langie.

9

le langage s'appelle "Perl" ; sans 'e' à la fin, et avec une majuscule...
l'interpréteur (on va dire que c'est un interpréteur ^^ ) s'appelle "perl" ; toujours sans 'e' à la fin, mais sans majuscule, cette fois-ci...

pas "perle" ^^

et ça accepte vraiment de tout grin
autant tu peux faire du lisible (ça donne des sources parfois longs ^^ ) ; autant tu peux faire des trucs ahurissant grin
avatar
Tutorial C (TI-89/92+/v200) - Articles Développement Web (PHP, Javascript, ...)
« What is the sound of Perl? Is it not the sound of a wall that people have stopped banging their heads against? » - Larry Wall

10

Oui, oups grin
faute de frappe ^^
avatar
Proud to be CAKE©®™


GCC4TI importe qui a problème en Autriche, pour l'UE plus et une encore de correspours nucléaire, ce n'est pas ytre d'instérier. L'état très même contraire, toujours reconstruire un pouvoir une choyer d'aucrée de compris le plus mite de genre, ce n'est pas moins)
Stalin est l'élection de la langie.