[Rio-pm] GENTILEZA GERA GENTILEZA (was: Mudando de formato)
Samir Cury
eu em samircury.eng.br
Segunda Abril 2 05:13:23 PDT 2012
Ola pessoal,
Uma opiniao de quem ja esteve do outro lado (~recentemente)
Quando estava realmente engatinhando em Perl (2007) eu tambem fazia
perguntas toscas aqui na lista, que poderia achar facilmente em algum
manual, e a resposta do pessoal bambeava entre "RTFM" e "Poderia ser
assim, mas nao vou perder mais que 5 min com isso". O que eu chamo de
"RTFM educativo". RTFM, mas te diz qual "M".
Acho isso bem interessante porque de um lado que muito RTFM espanta
novato, pouco deixa eles mal-acostumados. Depois de algumas respostas
comecei a procurar nas ferramentas que me apresentavam (Perldoc no
terminal, na web) do que no google, e tive um aprendizado bem mais
eficiente que isso.
Acho isso, um jeito de educar os novatos bem mais eficiente do que
algumas listas que ja vi, onde o pessoal e super-simpatico, mas so
fazem e recomendar livros/cursos, codigo que e bom na lista, nada.
Apesar de nao postar muito mais perguntas aqui, continuo lendo
bastante, pois 90% das respostas eu vejo codigo, tecnicas
interessantes ou opinioes tecnicas que agregam.
Bottom line e - RTFM bem aplicado pode ser construtivo, arrogancia
demais e o que pode estragar.
Abracos,
Samir
2012/4/2 Blabos de Blebe <blabos em gmail.com>:
> Usar sapatos macios demais deixa os pés frágeis.
>
> Alguns superlativos às vezes transmitem melhor a mensagem ao causar
> impacto. Sabe, pouco papo mais ação?
>
> É claro, minha opinião não reflete a opinião do grupo.
>
> []'s
>
> 2012/4/2 Nuba Princigalli <nuba em fastmail.fm>:
>> Blabos,
>>
>> Forum Invaders usa Perl? Que bacana! Usam mal? Você se importa com isso?
>> Use a oportunidade para apresentar um bom Perl à eles, você pode soltar
>> bile aqui ou soltar uma luz lá, com comparavelmente o mesmo esforço.
>>
>> Apesar dos "sou legal de novo" e "amigão" sua resposta é tudo menos
>> "legal" e "amigão". A cultura da nossa comunidade é fruto das ações de
>> todos, vamos ser gentis com quem chega, apontar na direção dos próximos
>> passos e ter paciência. Não precisamos jogar pedra no vidro de nenhuma
>> outra comunidade, como diz Gandhi: quem precisa humilhar os outros pra
>> se sentir forte é o fraco. Pode não ser sua realidade, mas acredite,
>> passada a poeira, é essa a leitura que fica.
>>
>> Olha o tópico do nosso canal:
>>
>> 07:34 Topic for #rio-pm: Rio.PM | MEUS FILHOS BEM VINDOS AO RIO
>> GENTILEZA GERA GENTILEZA AMORRR BELEZA PERFEIÇÃOO BONDADE E RIQUEZA
>> 07:34 Topic set by garu breno em shadow.cat ; Mon Mar 26 01:00:27 2012
>>
>> Abraços,
>>
>> Nuba Princigalli
>>
>>
>> On Sun, Apr 1, 2012, at 11:48 AM, Blabos de Blebe wrote:
>>> Forum Invaders?
>>>
>>> É por isso que vc tá fazendo pergunta tosca.
>>>
>>> Pelamor..., os exemplos desse site não tem nem use strict.
>>>
>>> É por isso que você não sabe o que é contexto, o que é $_, @_, o básico.
>>>
>>> Olha só, eu vou ser legal denovo.
>>>
>>> "Qualquer tecnologia suficientemente avançada parece ser mágica" (
>>> Arthur C. Clarke )
>>>
>>> É por isso que nos anos 90 quem usava Perl era tido como
>>> hackerzão-fodástico-ultra-ultra.
>>>
>>> Desde então tem um monte de forum cuspindo Perl 4 dos anos 90, como se
>>> isso fosse o supra-sumo da programação.
>>>
>>> A menos que me provem o contrário, em termos de programação, onde
>>> existem as duas palavras juntas, perl e forum, há quase sempre lixo.
>>>
>>> Olhe um exemplo do tal forum
>>>
>>> http://www.forum-invaders.com.br/vb/showthread.php/40480-Perl-Obtendo-o-conteúdo-de-Sites?highlight=perl
>>>
>>> Ele é de 2012, e não usa nem strict. Ele trata html com expressão
>>> regular. É típico de quem parou no tempo, em 1997.
>>>
>>> Os caras são tão bons que acham que Perl é PHP.
>>>
>>> É brincadeira isso, só pode.
>>>
>>> Aureliano, você precisa estudar o básico da linguagem antes de querer
>>> ficar *pegando atalho*.
>>>
>>> Não existe almoço grátis, amigão. Quer trabalhar com Bioinformática,
>>> vai ter que estudar Biologia *E* Programação.
>>>
>>> Olha só, a partir de agora, eu só vou te responder, depois que vc
>>> largar essa idéia de forum adolescente e ler pelo menos o Modern Perl.
>>>
>>> Não desperdice o tempo que que eu já gastei com vc.
>>>
>>> Aff
>>>
>>>
>>>
>>> 2012/4/1 Aureliano Guedes <guedes_1000 em hotmail.com>:
>>> > Consegui, mais ou menos aqui, apesar da grande ajuda que tive aqui e no
>>> > Forum-Invaders,
>>> > ainda sim fui eu que fiz, portanto entendi muita coisa.
>>> >
>>> > Contudo ainda tem me voltado um erro na hora de executar, apesar de gerar a
>>> > saida como o desejado
>>> > aparece alguns prints desnecessarios.
>>> >
>>> > exemplo #11, #20, #26 aprarecem duas vezes, na primeira vez como deveria ser
>>> > na segunda sem nada, conferi os dados, saem todos corretos, mas quando o
>>> > trabalho
>>> > do script é 0 ($work = 0), ele continua printando o dado.
>>> >
>>> > se alguem puder dar uma lida e tenta me ajudar como resolver esse
>>> > encomodo...
>>> >
>>> > [CODE]
>>> > #!/usr/bin/perl
>>> > use common::sense;
>>> > my $work = 0;
>>> > my $count = 0;
>>> > my $lastline = /[A-Za-z]/;
>>> > foreach my $line(<DATA>){
>>> > chop($line);
>>> > if($work == 1){
>>> > $line =~ /(.+),\s+(.+)$/;
>>> >
>>> > if($1 eq ($lastline x 3)){
>>> > $work = 0;
>>> > $count--;
>>> >
>>> > }
>>> >
>>> > my @contents= split(/\s/, $2);
>>> >
>>> >
>>> >
>>> > my ( @first, @second );
>>> > foreach (@contents){
>>> > my ($first, $second) = /(\d{2})(\d{2})/;
>>> > push(@first, int($first));
>>> > push(@second, int($second));
>>> > }
>>> >
>>> > $count++;
>>> > print "#$count\n", join(" ", @first), "\n", join(" ", @second),
>>> > "\n";
>>> > }
>>> > if($line eq "Pop"){
>>> > $work = 1;
>>> > }
>>> > }
>>> > __DATA__
>>> >
>>> > Pop
>>> > 001, 0303 0303 0101 1011 0304
>>> > 002, 0303 0003 0101 0410 0405
>>> > 003, 0303 0305 0101 1013 0304
>>> > 004, 0103 0304 0102 0207 0104
>>> > 005, 0303 0506 0101 0407 0405
>>> > 006, 0303 0405 0101 0506 0405
>>> > 007, 0303 0104 0101 0204 0305
>>> > 008, 0303 0105 0101 0203 0304
>>> > 009, 0303 0303 0101 1011 0404
>>> > 010, 0303 0303 0101 0507 0405
>>> >
>>> > Gra, 0203 0304 0202 0207 0105
>>> > Pop
>>> > 050, 0103 0304 0102 0206 0105
>>> > 051, 0103 0304 0202 0102 0105
>>> > 052, 0303 0305 0102 0404 0507
>>> > 053, 0103 0506 0202 0205 0105
>>> > 054, 0303 0404 0101 0411 0405
>>> > 055, 0103 0505 0202 0306 0102
>>> > 056, 0303 0404 0101 0912 0304
>>> > 057, 0303 0404 0102 0406 0105
>>> > Lev, 0303 0303 0202 0106 0105
>>> > Pop
>>> > 078, 0303 0303 0101 0407 0405
>>> > 079, 0303 0303 0101 0506 0405
>>> > 080, 0203 0303 0102 0510 0405
>>> > 081, 0303 0303 0101 0708 0404
>>> > 082, 0101 0404 0202 0202 0101
>>> > Mod, 0303 0203 0102 0608 0105
>>> > Pop
>>> > 011, 0303 0304 0102 0710 0405
>>> > 002, 0103 0405 0102 0313 0104
>>> > 003, 0303 0204 0202 0209 0405
>>> > 004, 0303 0303 0101 1011 0404
>>> > 005, 0303 0305 0101 0413 0405
>>> > 006, 0101 0404 0202 0202 0101
>>> > 007, 0303 0104 0101 0211 0304
>>> > 008, 0303 0103 0101 0210 0304
>>> > 009, 0303 0304 0102 0210 0405
>>> > 010, 0303 0303 0101 0411 0405
>>> > 011, 0303 0305 0102 0407 0405
>>> > 012, 0101 0404 0202 0203 0101
>>> > 013, 0303 0303 0101 0404 0404
>>> > 014, 0303 0303 0101 0110 0405
>>> > 015, 0103 0404 0202 0206 0101
>>> > 016, 0303 0304 0202 0204 0305
>>> > 017, 0303 0304 0202 0511 0407
>>> > 018, 0103 0204 0202 0102 0105
>>> > CTR, 0103 0304 0202 0210 0303
>>> > [/CODE]
>>> >
>>> > Bem, agradeço a todos, mas ainda digo que essa é so uma parte do programa...
>>> > mas é a mais dificil.
>>> >
>>> >
>>> >
>>> >
>>> >
>>> > ________________________________
>>> > From: bruno.buss em gmail.com
>>> > Date: Sat, 31 Mar 2012 22:07:26 -0300
>>> >
>>> > To: rio-pm em pm.org
>>> > Subject: Re: [Rio-pm] Mudando de formato
>>> >
>>> > 2012/3/31 Aureliano Guedes <guedes_1000 em hotmail.com>
>>> >
>>> > Primeiro, sei que $_ é uma variavel especial, sei pra que serve, mas quando
>>> > temos $_[0], $_[1] etc... isso é o mesmo que manipulação direta de array??
>>> >
>>> >
>>> > Sim, no caso você está manipulando o array @_ ;)
>>> > http://perldoc.perl.org/perlvar.html
>>> >
>>> >
>>> >
>>> > Outra duvida é quando temos @{alguma coisa}, por exemplo @{$_}... o que esse
>>> > array com chaves quer dizer, digo, o que ele faz??
>>> >
>>> >
>>> > http://perldoc.perl.org/perlreftut.html
>>> >
>>> > [ ]'s
>>> > --
>>> > Bruno C. Buss
>>> > http://brunobuss.wordpress.com/
>>> > http://www.dcc.ufrj.br/~brunobuss/
>>> >
>>> > _______________________________________________ Rio-pm mailing list
>>> > Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm
>>> >
>>> > _______________________________________________
>>> > Rio-pm mailing list
>>> > Rio-pm em pm.org
>>> > http://mail.pm.org/mailman/listinfo/rio-pm
>>> _______________________________________________
>>> Rio-pm mailing list
>>> Rio-pm em pm.org
>>> http://mail.pm.org/mailman/listinfo/rio-pm
>> --
>> Nuba R. Princigalli nuba em pauleira.com http://pauleira.com @nprincigalli
>> Discipline is not an end in itself, just a means to an end. - King Crimson
>>
>> _______________________________________________
>> Rio-pm mailing list
>> Rio-pm em pm.org
>> http://mail.pm.org/mailman/listinfo/rio-pm
> _______________________________________________
> Rio-pm mailing list
> Rio-pm em pm.org
> http://mail.pm.org/mailman/listinfo/rio-pm
Mais detalhes sobre a lista de discussão Rio-pm