Re: [Rio-pm] livros usados
Olá Ivan, tudo bem? Eu tenho uma versão mais antiga do livro Modern Per, e se quiser eu posso te dar esse livro de graça! Ele pode ser obtido de graça online em versão digital, porém eu comprei para dar suporte ao autor. Você poder obter mais detalhes sobre esse livro nos seguintes links: http://www.modernperlbooks.com/ http://onyxneon.com/books/modern_perl/ atenciosamente, Vinícius Miasato Em 1 de agosto de 2015 09:24, Ivan lopes lopesivan@gmail.com escreveu: algém está vendendo livros de Perl usados ??? gostaria de comprar alguns ... ___ Rio-pm mailing list Rio-pm@pm.org http://mail.pm.org/mailman/listinfo/rio-pm ___ Rio-pm mailing list Rio-pm@pm.org http://mail.pm.org/mailman/listinfo/rio-pm
Re: [Rio-pm] Encontro social de março
Opa, Areal no encontro social? OMG OMG OMG abs. Japa Em 9 de março de 2015 17:49, Guilherme Alves guilhermeareal+ri...@gmail.com escreveu: Barra é muito longe.. 2015-03-09 17:48 GMT-03:00 Guilherme Alves guilhermeareal+ri...@gmail.com : Opa!! Estarei no Rio neste dia! Presença confirmada! 2015-03-09 16:15 GMT-03:00 Vinícius Miasato viniciusmias...@gmail.com: Opa, contem comigo, abs. Japa Em 9 de março de 2015 16:10, Rafael Lopes rafaoliveiralo...@gmail.com escreveu: Lindões e lindonas, nosso encontro social é quinta agora, dia 12. Sugiro o lugar de sempre: Bar Brasil na São Salvador. =) Como hora, as 19 horas tá ok? Eu estarei presente nesse. \o/ []s bola ___ Rio-pm mailing list Rio-pm@pm.org http://mail.pm.org/mailman/listinfo/rio-pm ___ Rio-pm mailing list Rio-pm@pm.org http://mail.pm.org/mailman/listinfo/rio-pm -- Guilherme Alves -- Guilherme Alves ___ Rio-pm mailing list Rio-pm@pm.org http://mail.pm.org/mailman/listinfo/rio-pm ___ Rio-pm mailing list Rio-pm@pm.org http://mail.pm.org/mailman/listinfo/rio-pm
Re: [Rio-pm] Encontro social de março
Opa, contem comigo, abs. Japa Em 9 de março de 2015 16:10, Rafael Lopes rafaoliveiralo...@gmail.com escreveu: Lindões e lindonas, nosso encontro social é quinta agora, dia 12. Sugiro o lugar de sempre: Bar Brasil na São Salvador. =) Como hora, as 19 horas tá ok? Eu estarei presente nesse. \o/ []s bola ___ Rio-pm mailing list Rio-pm@pm.org http://mail.pm.org/mailman/listinfo/rio-pm ___ Rio-pm mailing list Rio-pm@pm.org http://mail.pm.org/mailman/listinfo/rio-pm
Re: [Rio-pm] Encontro social de março
Opa, lá é barra ... abs. Japa Em 9 de março de 2015 16:54, Blabos de Blebe bla...@gmail.com escreveu: Que tal na Barra? 2015-03-09 16:15 GMT-03:00 Vinícius Miasato viniciusmias...@gmail.com: Opa, contem comigo, abs. Japa Em 9 de março de 2015 16:10, Rafael Lopes rafaoliveiralo...@gmail.com escreveu: Lindões e lindonas, nosso encontro social é quinta agora, dia 12. Sugiro o lugar de sempre: Bar Brasil na São Salvador. =) Como hora, as 19 horas tá ok? Eu estarei presente nesse. \o/ []s bola ___ Rio-pm mailing list Rio-pm@pm.org http://mail.pm.org/mailman/listinfo/rio-pm ___ Rio-pm mailing list Rio-pm@pm.org http://mail.pm.org/mailman/listinfo/rio-pm ___ Rio-pm mailing list Rio-pm@pm.org http://mail.pm.org/mailman/listinfo/rio-pm ___ Rio-pm mailing list Rio-pm@pm.org http://mail.pm.org/mailman/listinfo/rio-pm
Re: [Rio-pm] ES de Janeiro
Opa, é aqui ó: https://www.google.com.br/maps/place/Pra%C3%A7a+S%C3%A3o+Salvador/@-22.9338815,-43.180401,17z/data=!4m5!1m2!2m1!1sPra%C3%A7a+S%C3%A3o+Salvador,+Laranjeiras,+Rio+de+Janeiro!3m1!1s0x997f85f6fc37e5:0x19b919bb14ffcf79 abs. Japa Em 5 de janeiro de 2015 13:26, Fernando Oliveira fernandocor...@gmail.com escreveu: Onde é a praça são salvador? Em 05/01/2015, à(s) 13:17, Rafael Lopes rafaoliveiralo...@gmail.com escreveu: Praça São Salvador. Em 05/01/2015 13:14, Fernando Oliveira fernandocor...@gmail.com escreveu: Onde é esse Bar Brasil? Em 05/01/2015, à(s) 12:15, Rafael Lopes rafaoliveiralo...@gmail.com escreveu: Bar Brasil! :-) Em 05/01/2015 12:10, breno oainikus...@gmail.com escreveu: Bar Brasil? :D 2015-01-05 12:04 GMT-02:00 Rodrigo Mosconi (perl) p...@mosconi.mat.br: Fala pessoal, Então nesta quinta (8/1) será a segunda quinta do mês, e onde será o ES? Att, ___ Rio-pm mailing list Rio-pm@pm.org http://mail.pm.org/mailman/listinfo/rio-pm ___ Rio-pm mailing list Rio-pm@pm.org http://mail.pm.org/mailman/listinfo/rio-pm ___ Rio-pm mailing list Rio-pm@pm.org http://mail.pm.org/mailman/listinfo/rio-pm ___ Rio-pm mailing list Rio-pm@pm.org http://mail.pm.org/mailman/listinfo/rio-pm ___ Rio-pm mailing list Rio-pm@pm.org http://mail.pm.org/mailman/listinfo/rio-pm ___ Rio-pm mailing list Rio-pm@pm.org http://mail.pm.org/mailman/listinfo/rio-pm ___ Rio-pm mailing list Rio-pm@pm.org http://mail.pm.org/mailman/listinfo/rio-pm
Re: [Rio-pm] Encontro social de Outubro
Garu, cadê o resumo? abs. Japa Em 9 de outubro de 2014 15:46, breno oainikus...@gmail.com escreveu: É hoje! \o/ 2014-10-07 13:09 GMT-03:00 Leo Balter leonardo.bal...@gmail.com: então é lá que vou marcar com a galera da Estante, avise a quem quiser ir, pois sábado já não vou mais estar pelo Brasil. Em 7 de outubro de 2014 10:59, Rafael Lopes rafaoliveiralo...@gmail.com escreveu: Olá a todos, Encontro Social de Outubro: Dia 09/10 as 19:00 Bar Brasil, na praça São Salvador (largo do machado). Abraços a todos e até lá. =) bola Em 7 de outubro de 2014 09:19, Rodrigo Mosconi (perl) p...@mosconi.mat.br escreveu: Então pessoal, onde será o encontro social deste mês? Esta quinta (09/10) será a segunda quinta do mes. ___ Rio-pm mailing list Rio-pm@pm.org http://mail.pm.org/mailman/listinfo/rio-pm ___ Rio-pm mailing list Rio-pm@pm.org http://mail.pm.org/mailman/listinfo/rio-pm ___ Rio-pm mailing list Rio-pm@pm.org http://mail.pm.org/mailman/listinfo/rio-pm ___ Rio-pm mailing list Rio-pm@pm.org http://mail.pm.org/mailman/listinfo/rio-pm ___ Rio-pm mailing list Rio-pm@pm.org http://mail.pm.org/mailman/listinfo/rio-pm
Re: [Rio-pm] Ajuda: download de imagem
Que coisa trágica hein?! abs. Em 7 de outubro de 2014 12:32, breno oainikus...@gmail.com escreveu: 2014-10-06 22:40 GMT-03:00 Aureliano Guedes guedes_1...@hotmail.com: Gente, Estou muito enferrujado quanto a programação. Tem uma biblioteca virtual que tenho acesso e queria criar um script para baixar imagem por imagem de um livro qualquer. Mas aparentemente é tudo feito em JS e acho que o método para passar as paginas seria por jQuery. Não tenho certeza. Cuidado pra não baixar dados não autorizados :( http://www.nytimes.com/2013/01/13/technology/aaron-swartz-internet-activist-dies-at-26.html ___ Rio-pm mailing list Rio-pm@pm.org http://mail.pm.org/mailman/listinfo/rio-pm ___ Rio-pm mailing list Rio-pm@pm.org http://mail.pm.org/mailman/listinfo/rio-pm
Re: [Rio-pm] Encontro Social QUINTA! \o/
Garu, como é que é? Cadê o resumo? atenciosamente, Vinícius Miasato Em 15 de setembro de 2014 08:19, Bruno Buss bruno.b...@gmail.com escreveu: Tem resumo? :p Em 11/09/2014 13:21, breno oainikus...@gmail.com escreveu: É hoje! É hoje! Encontro vocês lá :D 2014-09-10 15:58 GMT-03:00 Vinícius Miasato viniciusmias...@gmail.com: Opa, na minha volta ao Brasil em novembro compareço presença confirmada. atenciosamente, Vinícius Miasato Em 10 de setembro de 2014 10:24, Claudio Pereira claudiopere...@gmail.com escreveu: 2014-09-09 18:04 GMT-03:00 breno br...@rio.pm.org: Oi pessoal! Vamos retomar os tradicionais Encontros Sociais da Rio Perl Mongers? Sinto falta dos ES! Quando eu for no RJ e tiver com tempo sobrando a noite, vou tentar marcar um ESX. ;-) -- Abraços, IndioX. -- Claudio P Costa BSDA Certified - http://bsdcertification.org ___ Rio-pm mailing list Rio-pm@pm.org http://mail.pm.org/mailman/listinfo/rio-pm ___ Rio-pm mailing list Rio-pm@pm.org http://mail.pm.org/mailman/listinfo/rio-pm ___ Rio-pm mailing list Rio-pm@pm.org http://mail.pm.org/mailman/listinfo/rio-pm ___ Rio-pm mailing list Rio-pm@pm.org http://mail.pm.org/mailman/listinfo/rio-pm ___ Rio-pm mailing list Rio-pm@pm.org http://mail.pm.org/mailman/listinfo/rio-pm
Re: [Rio-pm] Encontro Social QUINTA! \o/
Opa, eu vou! atenciosamente, Vinícius Miasato Em 9 de setembro de 2014 18:04, breno br...@rio.pm.org escreveu: Oi pessoal! Vamos retomar os tradicionais Encontros Sociais da Rio Perl Mongers? Quinta feira agora, dia 11, no Sonho Lindo! O endereço é Rua Mário Portela 16, ali na entrada da Rua Alice, em Laranjeiras. Para quem precisar de mapa: https://goo.gl/maps/VBbdj Nos vemos lá à partir das 19:00! \o/ []s -b ___ Rio-pm mailing list Rio-pm@pm.org http://mail.pm.org/mailman/listinfo/rio-pm ___ Rio-pm mailing list Rio-pm@pm.org http://mail.pm.org/mailman/listinfo/rio-pm
Re: [Rio-pm] ES - Rua Alice
Opa, dia ESX dia 22/05, agendado. atenciosamente, Vinícius Miasato Em 7 de maio de 2014 21:19, Lindolfo Rodrigues l...@lornlab.org escreveu: Se for dia 22/05 eu participo :) -- Lindolfo Rodrigues On Wednesday, May 7, 2014 at 7:46 PM, Vinícius Miasato wrote: Opa pessoal, já faz tanto tempo! Que tal um ES pra animar a lista?! atenciosamente, Vinícius Miasato ___ Rio-pm mailing list Rio-pm@pm.org http://mail.pm.org/mailman/listinfo/rio-pm ___ Rio-pm mailing list Rio-pm@pm.org http://mail.pm.org/mailman/listinfo/rio-pm ___ Rio-pm mailing list Rio-pm@pm.org http://mail.pm.org/mailman/listinfo/rio-pm
[Rio-pm] ES - Rua Alice
Opa pessoal, já faz tanto tempo! Que tal um ES pra animar a lista?! atenciosamente, Vinícius Miasato ___ Rio-pm mailing list Rio-pm@pm.org http://mail.pm.org/mailman/listinfo/rio-pm
Re: [Rio-pm] [GOLF] Descanso de Pascoa: Maior palindromo
Opa Aureliano,
eu não olhei seu código, só olhei esse seu trecho:
Fazer:
$time = reverse $time;
$time++;
$time = reverse $time;
gera um desempenho melhor que fazer:
$time = reverse (reverse $time++);
Eu não estou preocupado com a performance aqui. Meu ponto é a corretude
disso. Eu posso estar falando besteira, estou com um pouco de sono, mas os
trecho fazem coisas diferentes:
Ex.:
$time_original = time;
print qq{TIME:[$time_original]$/$/};
$time1 = $time_original;
$time2 = $time_original;
{
$time1 = reverse $time1;
$time1++;
$time1 = reverse $time1;
print qq{TIME 1: [$time1]$/$/};
}
{
$time2 = reverse (reverse $time2++);
print qq{TIME 2: [$time2]$/$/};
}
atenciosamente,
Vinícius Miasato
Em 1 de maio de 2014 22:27, Aureliano Guedes guedes_1...@hotmail.comescreveu:
E pronto minha solução sem os bugs que falou: http://pastebin.com/PQQyg5BK
Engraçado: teve o melhor desempenho.
Um simples detalhe reduziu o tempo de execução pela metade.
Fazer:
$time = reverse $time;
$time++;
$time = reverse $time;
gera um desempenho melhor que fazer:
$time = reverse (reverse $time++);
--
From: guedes_1...@hotmail.com
To: rio-pm@pm.org
Date: Fri, 2 May 2014 00:04:04 +
Subject: Re: [Rio-pm] [GOLF] Descanso de Pascoa: Maior palindromo
Bruno, resolvi o problema e segui a sua dica:
http://cpansearch.perl.org/src/ACPGUEDES/Math-Palindrome-undef/lib/Math/Palindrome.pm
O
http://search.cpan.org/~kryde/Math-NumSeq-70/lib/Math/NumSeq/Palindromes.pm
era
muito incompleto!
--
From: bruno.b...@gmail.com
Date: Mon, 28 Apr 2014 21:24:50 -0300
To: rio-pm@pm.org
Subject: Re: [Rio-pm] [GOLF] Descanso de Pascoa: Maior palindromo
O problema é que quando time() está entre 89 e 96, next_prime($time)
retorna 97... e a palindrome(97) retorna 107 - se não errei o chines mental
que acabei de fazer - ou seja, pulando um palíndromo primo, que seria a
resposta correta. O mesmo problema de antes, sua heurística para tentar
pular números na sequencia de primos/palíndromos ainda não está muito boa.
Mais uma dica: Ao invés de usar aquela formula toda para pegar a 1a/2a
metade dos dígitos do numero, porque você não usa a substr()? :-)
2014-04-27 20:49 GMT-03:00 Aureliano Guedes guedes_1...@hotmail.com:
Bruno,
Tratei a maioria dos erros e ainda ganhei em desempenho.
O problema é que tem um bug que não consegui tratar.
Quando 89 = time() = 96 sempre retorna 131 e não 101, mas quando 89 ou
96 retorna corretamente 101.
http://pastebin.com/3QVnbjbP
--
Date: Sun, 27 Apr 2014 14:00:02 -0300
From: guedes_1...@hotmail.com
To: rio-pm@pm.org
Subject: Re: [Rio-pm] [GOLF] Descanso de Pascoa: Maior palindromo
Buss,
Obrigado por analisar o código.
Realmente eu fiz apenas alguns teste mas nao o suficiente para perceber
esses bugs que me falou.
Essa heurística foi apenas experimental.
E ainda pode ser otimizada.
Nao sou muito habilidoso quando se trata de achar esses tipos de erros.
Por exemplo, se na rotina de geração de palíndromo eu verificasse se o
palíndromo gerado e par já ganharia no desempenho mas nao resolveria os
problemas que citou.
Vou ver o que posso fazer para resolver esses bugs.
Obrigado pela análise.
Bruno Buss bruno.b...@gmail.com escreveu:
Olá Aureliano,
Muito bom seu esforço... mas eu acho que você deveria elaborar e rodar
alguns testes unitários para o seu código. :-)
Por exemplo, o seu código anterior (com as subs _par e _impar), imprimia
101 se o time() fosse 102. A resposta correta seria 131. A sua
heurística geradora de palindromos andou para trás nesse caso... me
parece um erro de design do algoritmo.
Essa sua nova versão:
* Imprime 13 se o time() for 13... e 13 nem é palindromo! O resultado
correto nesse caso é 101. Mas isso é só um erro no seu loop principal,
que se for primo direto no começo ele nem verifica se é palindromo mas já
imprime direto.
* Imprime 1003001 se o time() for 96... o que me parece meio longe do
resultado esperado, 101. Nesse caso, emho, o problema é a sua heurística
geradora de palindromos.
Ou seja, a eficiência do algoritmo é muito importante... mas sua
corretude deve vir antes. (A menos é claro que estejamos falando de
algoritmos aproximativos ou heurísticas para problemas intratáveis :-)
Nesse caso em específico, parece que essa sua função geradora de
palindromos é de fato uma heurística para dar bumps na sequência e
economizar verificações... mas como observado você corre o risco de pular
algo que não deveria.
Só como dúvida, essa sua heurística é fundamentada em algum resultado
matemático de fato ou apenas experimental?
[ ]'s
Buss
2014-04-27 3:06 GMT-03:00 Aureliano Guedes guedes_1...@hotmail.com:
Esquece a ultima versão.
Divisão é pesado para o processador.
Fiz uma versão menor com menos divisões que parece ter uma melhor
performance.
http://pastebin.com/jrjEv3eh
Re: [Rio-pm] [GOLF] Descanso de Pascoa: Maior palindromo
Opa,
parabéns por aceitar o desafio e levá-lo até o fim! Não sei se o código
funciona, mas o jogo de GOLF ainda está de pé?
atenciosamente,
Vinícius Miasato
Em 22 de abril de 2014 13:13, Aureliano Guedes
guedes_1...@hotmail.comescreveu:
http://ideone.com/LjvMRz
4:30 rodando no dinossauro (AMD Athlon 1.6GHz, 2GB Ram)
--
Date: Thu, 17 Apr 2014 22:25:48 -0300
From: guedes_1...@hotmail.com
To: rio-pm@pm.org
Subject: Re: [Rio-pm] [GOLF] Descanso de Pascoa: Maior palindromo
Boa ideia. Vou tentar.
Blabos de Blebe bla...@gmail.com escreveu:
Que tal o menor palíndromo primo maior que time()?
2014-04-17 22:02 GMT-03:00 Aureliano Guedes guedes_1...@hotmail.com:
Pode ficar menor.
say '906609'
Tiago Peczenyj tiago.pecze...@gmail.com escreveu:
sub palindromo { 906609 }
2014-04-17 21:45 GMT-03:00 Aureliano Guedes guedes_1...@hotmail.com:
Ola monges,
Nos últimos meses tenho visto nosso grupo um pouco parado.
E como estamos em véspera de pascoa.
Proponho uma brincadeira.
Jogar golf com o Desafio do Maior Palíndromo.
O desafio é simples, achar o maior número palíndromo (ou seja, quando
lido de trás pra frente continua o mesmo) que seja resultado de uma
multiplicação de dois números de 3 dígitos.
O resultado deverá ser: 906609
Eis a minha tacada:
for(my$i=100;$i1000;$i++){for(100..999){$_[0]=$_*$i
if(($_*$i==reverse($_*$i))($_*$i=$_[0]))}}say$_[0]
___
Rio-pm mailing list
Rio-pm@pm.org
http://mail.pm.org/mailman/listinfo/rio-pm
--
Tiago B. Peczenyj
Linux User #405772
http://about.me/peczenyj
___
Rio-pm mailing list
Rio-pm@pm.org
http://mail.pm.org/mailman/listinfo/rio-pm
___ Rio-pm mailing list
Rio-pm@pm.org http://mail.pm.org/mailman/listinfo/rio-pm
___ Rio-pm mailing list
Rio-pm@pm.org http://mail.pm.org/mailman/listinfo/rio-pm
___
Rio-pm mailing list
Rio-pm@pm.org
http://mail.pm.org/mailman/listinfo/rio-pm
___
Rio-pm mailing list
Rio-pm@pm.org
http://mail.pm.org/mailman/listinfo/rio-pm
[Rio-pm] ES
Opa monges, o ES no Le Brants pode ser ou algo contra alguém tem ? [ R. Barão do Flamengo Rio de Janeiro, 22230-050 ] abs. ___ Rio-pm mailing list Rio-pm@pm.org http://mail.pm.org/mailman/listinfo/rio-pm
Re: [Rio-pm] ES de fevereiro
partiu pizza, 17hrs ? fui ! Em 14 de fevereiro de 2013 15:55, Rodrigo Mosconi (perl) p...@mosconi.mat.br escreveu: Em 14 de fevereiro de 2013 14:35, Bruno Buss bruno.b...@gmail.com escreveu: Nem eu que moro na Barra apoio o ES na Barra =P (A Barra é contra-mão até pra quem mora lá, em qualquer hora do dia =P) Vou puxar um novo lugar: Rodízio de pizza na Parmê do Lgo. do Machado ;-) $Parme++ [ ]'s 2013/2/14 Giuliani Sanches giulianisanc...@gmail.com Ir e voltar para a Barra não é divertido :P (ok, no horário do ES deve estar mais tranquilo, mas mesmo assim ... :P ) $barra-- ___ Rio-pm mailing list Rio-pm@pm.org http://mail.pm.org/mailman/listinfo/rio-pm ___ Rio-pm mailing list Rio-pm@pm.org http://mail.pm.org/mailman/listinfo/rio-pm
Re: [Rio-pm] BrainFuck Interprer
não deveria ter um given em algum lugar do código para você utilizar o when ? abs. Em 11 de janeiro de 2013 10:43, Aureliano Guedes guedes_1...@hotmail.comescreveu: Ola mongens, Como alguns sabem eu estava tentando fazer um interpretador para brainfuck em Perl. Portanto segue o que consegui ate agora: http://pastebin.com/gJKizdYS Um script brainfuck para testarem, ele converte letras munusculas para maiusculas: http://pastebin.com/kzMMpUsA Deve ser executado assim: perl mybf.pl bf.b Mas estou com problemas. Toda vez que executo me retorna : Can't use when() outside a topicalizer at mybf.pl line 36, line 1. Alguem sabe o que esta acontecendo, e pode me ajudar. Desde já, grato. Att ___ Rio-pm mailing list Rio-pm@pm.org http://mail.pm.org/mailman/listinfo/rio-pm ___ Rio-pm mailing list Rio-pm@pm.org http://mail.pm.org/mailman/listinfo/rio-pm
Re: [Rio-pm] BrainFuck Interprer
Aureliano, seu código está bem confuso mesmo. você está realizando o foreach foreach my $i (split (//, $data)) e logo após o inicio do foreach você faz $i = substr($data,$s,2); você sabe explicar pq ? Outra dica: declare sua sub getchar no final do arquivo para deixar o código mais legível. Dica adiantada: antes de você trocar a sub e falar que o script parou de funcionar, na linha em que você realiza a chamada da sub getchar, coloque os () na função. ex.: getchar(); talvez isso ajude você a consertar o script, abs. Em 11 de janeiro de 2013 11:33, Vinícius Miasato viniciusmias...@gmail.comescreveu: bom, ... com o given o seu script executa, mas não termina. sem o given ele não executa ... escolha a melhor opção e continua desenvolvendo =) abs. Em 11 de janeiro de 2013 11:27, Aureliano Guedes guedes_1...@hotmail.comescreveu: Mudanças feitas. Mas vejam. Eu tinha tirado o given, mas coloquei de volta. O problema é, com o given, o STDIN não termina, eu digito alguma coisa e aperto enter naturalmente algo deveria acontecer, mas a unica coisa que acontece é uma quebra de linha. -- Date: Fri, 11 Jan 2013 11:16:26 -0200 From: viniciusmias...@gmail.com To: rio-pm@pm.org Subject: Re: [Rio-pm] BrainFuck Interprer não deveria ter um given em algum lugar do código para você utilizar o when ? abs. Em 11 de janeiro de 2013 10:43, Aureliano Guedes guedes_1...@hotmail.com escreveu: Ola mongens, Como alguns sabem eu estava tentando fazer um interpretador para brainfuck em Perl. Portanto segue o que consegui ate agora: http://pastebin.com/gJKizdYS Um script brainfuck para testarem, ele converte letras munusculas para maiusculas: http://pastebin.com/kzMMpUsA Deve ser executado assim: perl mybf.pl bf.b Mas estou com problemas. Toda vez que executo me retorna : Can't use when() outside a topicalizer at mybf.pl line 36, line 1. Alguem sabe o que esta acontecendo, e pode me ajudar. Desde já, grato. Att ___ Rio-pm mailing list Rio-pm@pm.org http://mail.pm.org/mailman/listinfo/rio-pm ___ Rio-pm mailing list Rio-pm@pm.org http://mail.pm.org/mailman/listinfo/rio-pm ___ Rio-pm mailing list Rio-pm@pm.org http://mail.pm.org/mailman/listinfo/rio-pm ___ Rio-pm mailing list Rio-pm@pm.org http://mail.pm.org/mailman/listinfo/rio-pm
Re: [Rio-pm] Chaves de hash
last;
Em 4 de dezembro de 2012 14:54, Blabos de Blebe bla...@gmail.com escreveu:
(my $d = $a) and $b;
Correto, conforme
http://perldoc.perl.org/perlop.html#Operator-Precedence-and-Associativity
A pegadinha (deixada como exercício) é que o operador de atribuição
tem maior precedência que o operador 'and'.
Por isso os exemplos usando atribuição estão se cagando todos:
$c = $a $b
é diferente de
$c = $a and $b
não por causa da diferença mística entre '' e 'and', mas por causa
do operador de atribuição ter mais precedência que 'and' e menos
precedência que o '';
$c = $a $b == $c = ( $a $b )
$c = $a and $b == ($c = $a) and $b
RTFM!
[]'s
2012/12/4 Junior Moraes juniiior...@gmail.com:
Hi.
A diferença entre e and não é apenas a questão da precedência dos
operadores?
Penso eu que essa questão não tenha nada a ver com short-circuiting, já
que
logicamente falando ambas fazem a mesma operação.
Exemplificando, quando temos:
use Data::Printer;
my $a = 1;
my $b = 0;
my $c = $a $b;
my $d = $a and $b;
p $c;
p $d;
O valor de $c seria FALSE, mas o valor de $d seria TRUE.
Isso, porque, pela precedência dos operadores, a última operação é a
mesma
coisa que:
(my $d = $a) and $b;
Deste modo, $d sempre resultará em TRUE, ignorando o $b.
Isto é, pelo menos é assim em outras linguagens e pelo que me parece, no
Perl também.
[]'s
Em 4 de dezembro de 2012 14:00, Blabos de Blebe bla...@gmail.com
escreveu:
Desculpa,
Não entendi a diferença entre:
perl -E 'sub a{say 1} sub b{say 2} if (a() b()){}'
perl -E 'sub a{say 1} sub b{say 2} if (a() and b()){}'
perl -E 'sub a{say 1;return 0} sub b{say 2} if (a() b()){}'
perl -E 'sub a{say 1;return 0} sub b{say 2} if (a() and b()){}'
Até onde eu sei, não existe operador de short circuit. O short circuit
é uma propriedade, uma otimização na avaliação de expressões lógicas.
Alguém estamos viajando?
[]'s
2012/11/30 thiagogla...@ticursos.net:
Eu devo ser muito estúpido... mas alguém que está falando isso (ja é
o 3o), poderia fazer o favor de me explicar porque ele deve usar
no
lugar do 'and' e qual diferença isso faz no caso deste if específico?
E em quais situações deve-se usar o 'and' no lugar de ?
Não é estúpido não. Vamos analisar a tabela da verdade da função and
ou
:
0 x 0 = 0
0 x 1 = 0
1 x 0 = 0
1 x 1 = 1
Então, no if do código do nosso biólogo não haveria impacto real,
sorry
eu
me deixei levar por outras coisas que estava pensando aqui.
Mas voltando ao if:
if($keys = $min and $keys = $max)
O operador de short circuit só avaliaria a expresssão da direita
($keys
=
$max) se a primeira expressão for verdadeira. Ou seja, se $keys for
menor
que $min o Perl nem vai perder tempo checando pois 0 x N = 0. Então
aqui
eu
me enganei, não ia fazer diferença no código do nosso colega.
Por outro lado, vamos supor um caso que você queira aproveitar o teste
if e
executar duas subs na mesma linha de código:
if ( foo and bar ){
...faça alguma coisa
}
else {
... bar só será executada se foo retornar true
}
por outro lado:
if ( foo bar ){
...foo e bar foram executadas. faça alguma coisa
}
else {
... foo e bar foram executadas mesmo com o retornando false.
}
essa é a diferença.
Em 2012-11-29 22:09, Bruno Buss escreveu:
2012/11/29 thiagogla...@ticursos.net
Seu primeiro erro é o operador and. No documento perlop: $ perldoc
perlop
você vai descobrir o seguinte:
Logical And
Binary and returns the logical conjunction of the two
surrounding expressions. It's equivalent to except for
the very low precedence. This means that it short-circuits:
i.e., the right expression is evaluated only if the left
expression is true.
[...]
C-style Logical And
Binary performs a short-circuit logical AND operation.
That is, if the left operand is false, the right operand is
not even evaluated. Scalar or list context propagates down
to the right operand if it is evaluated.
Logo, seu código
if($keys = $min and $keys = $max){
deveria ser if($keys = $min $keys = $max){
Eu devo ser muito estúpido... mas alguém que está falando isso (ja é
o 3o), poderia fazer o favor de me explicar porque ele deve usar
no
lugar do 'and' e qual diferença isso faz no caso deste if específico?
E em quais situações deve-se usar o 'and' no lugar de ?
[ ]'s--
Bruno C. Buss
http://www.brunobuss.net [1]
Links:
--
[1] http://www.brunobuss.net
___
Rio-pm mailing list
Rio-pm@pm.org
http://mail.pm.org/mailman/listinfo/rio-pm
___
Rio-pm mailing list
Rio-pm@pm.org
Re: [Rio-pm] Chaves de hash
já está chegando em 50 mensagens na thread, quem irá citar ele ?
Em quinta-feira, 29 de novembro de 2012, Blabos de Blebebla...@gmail.com
escreveu:
Só pra ser muito chato:
popular um hash inteiro já com os grupos montados,
http://wiki.mtgsalvation.com/article/Populate
Popular um hash é neologismo de 'populate a hash' que é equivalente a
povoar um hash...
2012/11/29 thiagogla...@ticursos.net:
Só para ser chato:
popular um hash inteiro já com os grupos montados,
popular
adj. 2 g.
1. Relativo ou pertencente ao povo.
2. Que é usado ou comum entre o povo.
3. Que é do agrado do povo.
4. Vulgar, notório.
5. Democrático.
s. m.
6. Homem do povo.
povoar - Conjugar
(povo + -oar)
v. tr.
1. Fundar povoações em.
2. Estabelecer habitantes em.
3. Disseminar animais para reprodução.
4. Dispor grande quantidade de árvores em.
5. Dispor grande quantidade de plantas (ex.: povoar o terreno de vinha).
6. [Por extensão] Encher com determinada coisa (ex.: a notícia
povoou a
sua vida com alegria).
v. pron.
7. Encher-se de habitantes.
Em 2012-11-29 19:41, Renato Santos escreveu:
Assim,
não sei se tem muita diferença na memoria entre um $h e um %s,
eu costumo usar $h por habito mesmo, mas poderia ser push
@{$h{$grupo}} sem problemas, talvez até @$h{$grupo} funcione certo
O 'evitar o loop' q eu digo, é você popular um hash inteiro já com os
grupos montados, por exemplo ,se o grupo for a cada 10 numeros reais,
voce poderia retornar
-30:-20 como chave para todos os valores de entrada dessa funcao, e
popular tudo de uma vez só, no lugar de ler as chaves a cada pergunta
de intervalo
2012/11/29 Aureliano Guedes guedes_1...@hotmail.com
Renato, fiquei sem entender, no meu caso não esta fazendo so um loop? E
qual a diferença entre usar um hash %h ou tranformar $h em um hash??
Desculpe as perguntas é que não faço nenhum curso ligado a computação
logo as vezes fico boiando.
Thiago, segue o script caso tenha também algo a modificar/acrescentar a
nível das minhas péssimas práticas.
use warnings;
use strict;
use Path::Class;
#Guardar os valores em um hash acessado pelo valor do mfe
sub h_energy{
my $data = shift;
my $file = file($data)-openr();
my %hmfe = ();
my $mirna;
my $record;
while (my $linha = $file) {
if ( $linha =~ m{target:.*} ) {
$record = $linha . $record if ($record);
$hmfe{$mirna} = $record if ($mirna);
$mirna = $+{mirna};
$record = q() if ($record);
}
elsif ($linha =~ m{mfe:s+(S+)s+kcal/mol}){
$mirna = $1;
$record .= $linha;
}
else {
$record .= $linha;
}
}
return %hmfe;
}
sub termofilter{
my ($data, $min, $max) = @_;
my %d = h_energy($data);
foreach my $keys (keys %d){
if($keys = $min and $keys = $max){
print $keys . n;
}
}
}
termofilter(hybrid.txt, -30, -20);
Date: Thu, 29 Nov 2012 17:27:15 -0200
From: thiagogla...@ticursos.net
To:
___
Rio-pm mailing list
Rio-pm@pm.org
http://mail.pm.org/mailman/listinfo/rio-pm
Re: [Rio-pm] GD::Graph: Como posso organizar as labels?
Olá Cleysinho, eu nunca trabalhei com o GD::Graph, mas já trabalhei com o Chart::Clicker, que é um módulo com uma api simples e é muito bom para gráficos do tipo que você perguntou. em anexo os gráficos de barras e pizza como exemplo, retirados da própria documentação. para posicionar a legenda o módulo possui o método legend_position além de outros métodos para manipulação de layout que também podem ser úteis e possam te ajudar, abs. Japa Em 25 de outubro de 2012 10:11, Cleysinho cleysinh...@gmail.com escreveu: Bom dia, Estou plotando alguns gráficos no modelo barras e pizza utilizando o módulo GD::Graph, os gráficos que possuem um data set menor deixam os gráficos com as labels legíveis e mais agradáveis. Estou com um problema com data set maiores que por sua vez deixam as labels desorganizadas ou amontoadas uma sobre as outras e consequentemente requerem que o tamanho da imagem seja maior (imagens em anexo). Preciso de retirar as labels do interior do gráfico em pizza e organizá-los do lado externo. Alguém poderia dar uma sugestão? -- .: Inteligência Coletiva :. Uma inteligência distribuída por toda parte: tal é o nosso axioma inicial. Ninguém sabe tudo, todos sabem alguma coisa, todo o saber está na humanidade’. (Pierre Lévy) José Cleydson F. da Silva Open Source Bioinformatics Community http://opensourcebioinformatics.com ___ Rio-pm mailing list Rio-pm@pm.org http://mail.pm.org/mailman/listinfo/rio-pm ___ Rio-pm mailing list Rio-pm@pm.org http://mail.pm.org/mailman/listinfo/rio-pm
Re: [Rio-pm] [Curitiba-pm] Contribuição ao Open Data BR - wikipoliticos.com.br
muito bom mesmo, parabéns, Em 5 de outubro de 2012 13:14, Ole Peter Smith ole@gmail.com escreveu: bacana 0le Send via Android On Oct 5, 2012 12:55 PM, Renato Santos renato.c...@gmail.com wrote: Gil++ Ficou muito legal! Depois das eleições, teremos mais dados para poder brincar com quem passou dos limites, ou não. 2012/10/5 Gil Magno gilma...@gmail.com Olá, Monges, Acompanho várias listas de Perl, mas mais com um observador. Gosto muito da linguagem; infelizmente no trabalho uso menos do que eu gostaria, mas estou mudando isso. Pesquisando para a eleições, achei uma fonte de dados muito boa no Tribunal Superior Eleitoral. A lei 9.504 obriga os candidatos a fazerem duas prestações de contas de suas campanhas ainda durante as eleições. Em agosto e em setembro eles declararam quanto e de quem receberam doações, e também com o que as gastaram. Peguei a segunda parcial (de setembro), importei para um banco de dados e fiz uma interface. Ela está em wikipoliticos.com.br Nessa página podemos ver as doações feitas para as campanhas de prefeito e vereador até o início de setembro, incluindo o nome de quem doou (pessoas físicas, empresas etc.) e a proporção por tipo de doação (doações de pessoas físicas, doações de empresas etc.) Também podemos ver o quanto cada candidato declarou que gastaria, no máximo, em sua campanha. Essa é uma informação muito importante, pois entre setembro e o dia das eleições as doações ainda estão acontecendo, mas a segunda prestação de contas parciais só nos dá dados até setembro. Assim como o www.deputando.com.br e o www.paraondefoiomeudinheiro.com.br, espero que seja uma contribuição para o Open Data BR. Os scripts de importação e a interface web foram escrito em Perl e Catalyst. A escrita está ruim[1], mas não me importo; ela está atingindo o objetivo de deixar a informação acessível, então tudo bem. Após às eleições vou reescrevê-lo e importar mais informações. E desculpem o relativo spam (estou mandando para muitas listas de Perl Qualquer crítica, sugestão, contribuição é bem-vinda. [1] github.com/gilmagno/dados-eleitorais gil ___ Curitiba-pm mailing list curitiba...@pm.org http://mail.pm.org/mailman/listinfo/curitiba-pm -- Saravá, Renato CRON http://www.renatocron.com/blog/ @renato_cron ___ Rio-pm mailing list Rio-pm@pm.org http://mail.pm.org/mailman/listinfo/rio-pm ___ Rio-pm mailing list Rio-pm@pm.org http://mail.pm.org/mailman/listinfo/rio-pm ___ Rio-pm mailing list Rio-pm@pm.org http://mail.pm.org/mailman/listinfo/rio-pm
