Mais um blog inútil.

Abril 26, 2009

Arvorezinha – Perl

Filed under: Arvorezinha,Coding,Useless — devnull @ 17:07

Já que avançámos para linguagens mais normais e para demonstrar que o python suga, segue o meu one liner em perl.


david@tokyo ~ $ perl -l arvorezinha.pl
*
**
***
****
*****
david@tokyo ~ $ cat arvorezinha.pl
for (1..5){print "*"x$_;}
david@tokyo ~ $ wc -c arvorezinha.pl

O "-l" põe automaticamente o carriage return no fim de cada linha.

Bem-haja!

Comentar

widgeon
widgeon
widgeon
widgeon