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
__
/ /\\
/ / \\
/ / /\\ \\
/ / /\\ \\ \\
/ /_/__\\ \\ \\
/________\\ \\ \\
\\___________\\/
Descubre otras anotaciones de Microsiervos
...y más todavía en la sección de Archivos de Microsiervos.
Estás leyendo una anotación de un weblog llamado Microsiervos, un sitio web personal en el que escribimos varios amigos.
Puedes visitar los archivos clasificados por fechas y por categorías o ir a la portada para ver lo más reciente que se ha publicado o leer más acerca de Microsiervos.