.Codebits 2008

.Ofertas SAPO Emprego

.posts recentes

. tartaruga

. pppp

. dfgfg

. Farmácias, SAPO e Meo

. Happy 1234567890

. Boas Festas

. Procura-se

. SAPO Codebits 2008. O eve...

. javascript submit gotcha

. Adeptos de futebol

.arquivos

. Março 2011

. Outubro 2009

. Março 2009

. Fevereiro 2009

. Dezembro 2008

. Outubro 2008

. Setembro 2008

. Julho 2008

. Fevereiro 2008

. Janeiro 2008

. Dezembro 2007

. Novembro 2007

. Outubro 2007

. Setembro 2007

.fotos

Sexta-feira, 4 de Janeiro de 2008

Season greetings

perl -e '
                   #
                  ###
                 $OoO=
                "\e[H";
               00;$oOo =
              "\e[1J";sub
             o {print @_;}
            o $oOo ; sub x{
           ($o , $O ) = @_ ;
          sprintf("% 13s%s\n"
         , $o, $O )}   sub O {
        o $OoO ; $c = "*" ; map
       {$o = $c x$_;$O=$c x($_-1
      );$d="@";sub k {$Q = shift;
     map{ substr($Q,rand(length($Q
    ) ), 1) = $d }( 1..length($Q) -
   1);return$Q;} $o=k($o); $_>1?$O=k
  ($O):"";$d="/"; $o=k($o); $_>1?$O=k
 ( $O ) : ""  ; $a [ $_ ] =x($o, $O );
}(1 ..12);o@a;o x"||";o x"||";sleep 1;o
               ;;O()
               ;}O;;
'

Copiar o código acima para a consola (Linux e OSX)
publicado por js às 20:27
link do post | comentar | favorito
|

.Unix Time

.pesquisar

 

.Março 2011

Dom
Seg
Ter
Qua
Qui
Sex
Sab
1
2
3
4
5
6
7
8
9
10
11
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31

.tags

. todas as tags

blogs SAPO

.subscrever feeds