Arvorezinha – Perl
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!