A vida em Perl…
Posted on | junho 18, 2009 | 1 Comment
#!/usr/bin/perl
while($alive) {
seek(LIFE,LOVE,HAPPINESS);
study($life);
if($day=~”^S” or $weekend) {
sleep($longer);
tell $theworld, “HOORAY!”;
play();
have($fun);
cut $GRASS;
} else {
sub work {
seek(PROBLEMS,0,1) and study;
$solve and $analyze until $done
};
}
}
Comments
One Response to “A vida em Perl…”
Leave a Reply
Enquanto isso no TudoNosso.com- Twitter @EliRios
- elirios: Ja se passaram 30 dias das mulheres e ainda não as entendo. Já desisti faz tempo. Ah, aliás, feliz dia das mulheres a todas. :p
- elirios: #morri, comedia // RT @Ticostacruz Toda vez q me concentro na Cacau 400 milhões de espermatozóides morrem!
- elirios: RT @kibeloco: Eliéser com uma camisa escrita "Smart Boy" é quase como o Hitler com um "100% Negro" no peito.
- elirios: @CPTM_oficial falta de informação nas estações e trens ainda é grande. Ainda falta muito. Tenho boas dicas como usuário. #fail
- elirios: @CPTM_oficial ,os maquinistas poderiam avisar que o trem é o expresso leste e vai para Estudantes, antes de todos descerem em Guaianases.
outubro 23rd, 2009 @ 19:50
Olá,
achei fantástico este post e peguei o texto para publicar no meu blog com os devidos créditos, espero que não sem importe.
Um abraço