Ammartins ( Tó ) @ 14:49

Sab, 02/01/10

2009 já foi, ano de mudança dizem ... well it sucked :) .

 

Dizem que cada um tem um que merece ( eu costumo dizer ), parece que não é bem assim, uns merecem mais do que outros.

 

 

Para 2010? Eu sei o que quero, agora se é para acontecer :D oh well em 2011 eu aviso.

 

2009 em Posts aqui na chafarica

 

01/01/2009

 

02/02/2009

 

03/03/2009

 

( Ok estava a ir tão bem isto do dia = mês .. tinha de estragar tudo )

 

06/04/2009

 

06/05/2009 ( Nota uns meses depois tinha o meu novo telemovel ;) )

 

( Boa ainda para mais em junho nem um post fiz ... )

 

31/07/2009 ( iPhone FTW )

 

06/08/2009 ( return perl If ( $_ == true ); )

 

21/09/2009 ( E vieram as férias :D )

 

03/10/2009 ( Não cheguei a acabar, não foi preciso :) todos sabem o que senti e sinto. "it sucked it sucks it will suck and that's the fuc*** true" )

 

12/11/2009 ( Sudo new and better life; Password: ****  Sorry, try again. )

 
06/12/2009  ( YaY Another Codebits )
 

Codebits 2009

2009 Codebits
 
 

Férias 2009

 

Yapc:Europe:2009




Ammartins ( Tó ) @ 23:06

Qui, 06/08/09

 

 

 

 

 




Ammartins ( Tó ) @ 18:41

Qui, 06/08/09

Cá vai o resumo para o dia 2

 

Uma vez mais, uma brilhante talk por parte do Joel Bernstein (‎joel‎)

 

 

Assunto da Talk : RESTFull HTTP Responses with Perl

 

Ainda espaço para a Talk mais cómica ( E com o melhor titulo )

Grenades, chainsaws, tarpits, and newbies

Apresentado por: brian d foy

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

Depois de almoço achei que seria bom ter outras perspectivas para além do VI como editor ( note: Vi continua na linha da frente eheheh )

 

Padre ( Perl Editor and much more )

 

Muito, se não igual ao NotPadd++,

 




Ammartins ( Tó ) @ 12:01

Qua, 05/08/09

Bem cá vai um resumo do que foi o Dia 1.

 

Marty's Room:

Talk apresentada por Joel Bernstein (‎joel‎)

 

Assunto: Painless Object-oriented XML with XML::Pastor

 

 

Bom fiquei com a impressão que embora um bom módulo, a sua "característica" de não ser bom para grandes ficheiros de XML o torna um pouco "unuseful" para uso em projectos que usem grandes ficheiros de XML para passar informação ( bom é o uso que lhes dou :P )

 

 

Beginning Perl

Talk aprentada por Thomas Klausner (‎domm‎)

 

Assunto: Write reusable code

 

Estava a espera desta talk ( bom no que toca a parte da manhã ), tirei boas conclusões no que toca a reusable code em PERL, mas fiquei com a sensação que para tornar a linguagem mais atractiva a alguns programadores que se estão a iniciar falta haver um consenso no meio de tantas versões e frameworks. O poder do OO no Moose é interessante.

 

Corporate Perl

Talk apresentada por Karl Moens (‎CountZero‎)

 

Assunto: All the Characters of Perl.

 

Grande demonstração do que o Perl pode juntar uma data de diferentes tecnologias e conseguir um produto final que é tomado como BOM.

Note: Karl Moens (‎CountZero‎) é um Advogado que programa em Perl, e tal como o próprio disse: Advogados dão os melhores programadores, eles sabem como respeitar regras melhor que ninguém.

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

A parte da tarde foi toda ela preenchida num workshop em WEBGUI.

 

Não posso falar muito no assunto ... a meio o meu mac foi atacado por um Polvo Gigante ...

 




Ammartins ( Tó ) @ 14:10

Ter, 18/11/08

O resultado de estudar n linguagens e usar outras n+1 no trabalho é algo como.

 

Eu: Curai, um foreach é

        foreach key ( array );

Colega: Mas tu tás parvo é?? onde é que já viste isso?

         foreach ( key in array ) ( C# )

 

Eu: Ahhh pera lá que estava a ver no Perl e não no C#


sinto-me: Cheio de informação ehehe
música: Jimmy Eat World: Bleed American - Alternative
Tags: , , ,


Ammartins ( Tó ) @ 15:51

Ter, 24/06/08

Como poupar um dia de trabalho.

 

#!/usr/bin/perl -w

sub leitura() {
    my @files = glob("c:\\pics\\*");

    foreach my $file (@files){
        # Gets Id
        my $ID = substr($file, 8, 3);
        if ( index($ID, "_", 0) == 1 ) {
             $ID = substr($ID,0,1);
        }
        else {
            $ID = substr($ID,0,2);
        }
        # End Get Id
        $file = substr($file, 8);
        print "($ID, 0, '$file', 0, 0.00, 0, '$file') \n";
    }
}

leitura();

 

O resultado,147 linhas de Sql em menos de 2segundos


música: Sit in the blues
Tags: ,


Ammartins ( Tó ) @ 17:04

Qui, 10/04/08

Retirado do livro -"Learning Perl, 4th Edition"

"If system administrators can't install software, what good are they? If you have trouble convincing your admin to install Perl, offer to buy pizza. We've never met a sys admin who could say no to a free pizza, or at least counteroffer with something as easy to get"

Bem não sou sys admin :D mas eu não recuso free pizzas :D


Novembro 2012
Dom
Seg
Ter
Qua
Qui
Sex
Sab

1
2
3

4
5
6
7
8
9
10

11
12
13
14
15
16
17

18
19
20
21
22
23
24

25
26
27
28
29
30


Pesquisar
 
subscrever feeds
blogs SAPO