[bcn-pm] JAPH amb nocturnitat (i 3)
Xavier Noria
fxn at hashref.com
Mon Jun 16 16:15:39 CDT 2003
On Monday 16 June 2003 22:42, Tim Allen wrote:
> Un JAPH es un programa que produce la cadena de texto "Just Another
> Perl Hacker,". Se utiliza en el concurso internacional de
> "obfuscación" de Perl, o sea, para ver quíen en el mundo puede
> producir el programa más dificil de leer, o con la utilización de
> algunas de las caracteristicas del lenguaje menos esperados, o lo que
> sea. Se atribuye la frase a Randall Schwartz, autor de "Learning
> Perl".
Solo quisiera a~nadir unos pocos links sobre JAPHs:
Aqui esta la definicion de JAPH de FOLDOC:
http://foldoc.doc.ic.ac.uk/foldoc/foldoc.cgi?japh
En esta pagina de CPAN hay unos cuantos ejemplos:
http://www.perl.com/CPAN/misc/japh
Aunque ahi los hay de todas las maneras, es tradicion que los JAPHs que
se usan como signature en mails o mensajes de news tengan lineas de
igual longitud.
Y este es un mensaje de Randal Swchartz en comp.lang.perl.misc donde
explica el origen de los JAPHs (como dijo Tim el los origino):
http://groups.google.com/groups?q=just+another+perl+hacker+group:comp.lang.perl.misc&hl=ca&lr=&ie=UTF-8&group=comp.lang.perl.misc&selm=m1hfpvh2jq.fsf%40halfdome.holdit.com&rnum=1
fxn
--
$_=q;Barcelona Perl Mongers;,$/=y,gaudi,,,;map$,+=(split//)*(-1)**$e++,
(split)[.11_09,1.714];$.=qq~~!~m~erce~;$"=y,catalunya,,,$;=y,rambles,,,
$*=$,-$/;$:=$.+length,$@=$***$**$/**$*%$:,$%=$/*$"-$*;print+chr($_<012?
"10$_":/^1/?"1$_":$_)for($**($**$%-$//$/),$%-$*,$,*$/,$***$***$*,$***$,
,$"*$@+$**$/,$**$,,$;,$***$***$*,$***$*,$.,$**$",$***$,,$***$***$**$,=>
~~$.,$"*$*,$***$/,$***$,,$,-$.,$"*$@+$**$/,$;*$/**$*,$",$.,++$@+by_fxn)
More information about the Barcelona-pm
mailing list