Por @Alvy — 27 de Octubre de 2006

A pesar de las clásicas limitaciones de la consola, y usando Perl, uno de los lenguajes de programación más ofuscados del universo, Root nos ha enviado cómo conseguir una figura imposible estilo M.C. Escher con unas pocas líneas de Perl…

#!/usr/bin/perl -i=-/*/~%*~%/~~%/~~~-/*/_/=~~~-/====~~! 
$o=35;
$_=\"$^I-*!=====_!/\";s/~/!*/g;s~%~-/ / ~g;$_.=\'---     Escher\';
s/=/__/g;
y|*!| \\\\|;
for(split/-/){print\' \'x$o--.\"$_\\n\"}

SerVer ~ # ./escher

                                   __
/ /\\
/ / \\
/ / /\\ \\
/ / /\\ \\ \\
/ /_/__\\ \\ \\
/________\\ \\ \\
\\___________\\/

Compartir en Flipboard  Compartir en Facebook  Tuitear


Economía Digital Netflix sabe más de ti de lo que crees Netflix sabe más de ti de lo que crees La app que evita el despilfarro de alimentos Facebook producirá series para competir con Netflix y Amazon El turismo sí puede ser sostenible La letra pequeña del fin del roaming puede amargar las vacaciones