<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN">
<html>
<head>
<meta content="text/html; charset=ISO-8859-1"
http-equiv="Content-Type">
</head>
<body bgcolor="#ffffff" text="#000000">
Em 21-07-2010 23:27, Bruno Buss escreveu:
<blockquote
cite="mid:AANLkTimcWcrItDM_NlBJ1GVjFSZPspbYdxaIR4zCn0kN@mail.gmail.com"
type="cite">push @juncao_elementos, @array1, @array2;</blockquote>
<br>
Nossa!...que "difícil" heim! :p<br>
Obrigado Bruno<br>
<br>
<blockquote
cite="mid:AANLkTimcWcrItDM_NlBJ1GVjFSZPspbYdxaIR4zCn0kN@mail.gmail.com"
type="cite">
<div><br>
<div class="gmail_quote">2010/7/21 "Flávio R. Lopes" <span dir="ltr"><<a
moz-do-not-send="true" href="mailto:flavio.lopes@links.inf.br">flavio.lopes@links.inf.br</a>></span><br>
<blockquote class="gmail_quote"
style="border-left: 1px solid rgb(204, 204, 204); margin: 0pt 0pt 0pt 0.8ex; padding-left: 1ex;">Aproveitando
a oportunidade, teria jeito mais fácil do que este que eu fiz para
juntar dois Arrays em um terceiro array, por exemplo:<br>
<br>
my @array1 = qw ( 4 5 6 7 );<br>
my @array2 = qw ( 8 9 );<br>
<br>
foreach my $elementos ( @array1, @array2 ) {<br>
<br>
push @juncao_elementos, $elementos;<br>
<br>
}<br>
<br>
<br>
<br>
<br>
Em 21-07-2010 22:45, Daniel de Oliveira Mantovani escreveu:
<div>
<div class="h5"><br>
<blockquote class="gmail_quote"
style="border-left: 1px solid rgb(204, 204, 204); margin: 0pt 0pt 0pt 0.8ex; padding-left: 1ex;">
Você pode contar o tanto de vezes que aparece em seguida,<br>
<br>
use strict;<br>
use warnings;<br>
use Data::Dumper;<br>
<br>
my @numeros = ( 1, 2, 3, 4, 5, 6, 6, 6, 5 );<br>
my %hash = map { $_ => { $_ => ++$_{$_} } } @numeros;<br>
<br>
print Dumper %hash;<br>
<br>
<resultado>mantovani@mantovani-desktop:~$ perl <a
moz-do-not-send="true" href="http://foo.pl" target="_blank">foo.pl</a><br>
$VAR1 = '6';<br>
$VAR2 = {<br>
'6' => 3<br>
};<br>
$VAR3 = '4';<br>
$VAR4 = {<br>
'4' => 1<br>
};<br>
$VAR5 = '1';<br>
$VAR6 = {<br>
'1' => 1<br>
};<br>
$VAR7 = '3';<br>
$VAR8 = {<br>
'3' => 1<br>
};<br>
$VAR9 = '2';<br>
$VAR10 = {<br>
'2' => 1<br>
};<br>
$VAR11 = '5';<br>
$VAR12 = {<br>
'5' => 2<br>
};<br>
</resultado><br>
<br>
<br>
2010/7/21 "Flávio R. Lopes"<<a moz-do-not-send="true"
href="mailto:flavio.lopes@links.inf.br" target="_blank">flavio.lopes@links.inf.br</a>>:<br>
<br>
<blockquote class="gmail_quote"
style="border-left: 1px solid rgb(204, 204, 204); margin: 0pt 0pt 0pt 0.8ex; padding-left: 1ex;">
Humm....<br>
<br>
Obrigado pessoal!<br>
<br>
Em 21-07-2010 21:41, Giuliani Sanches escreveu:<br>
<br>
<blockquote class="gmail_quote"
style="border-left: 1px solid rgb(204, 204, 204); margin: 0pt 0pt 0pt 0.8ex; padding-left: 1ex;">
Flávio,<br>
<br>
Hash não permite a duplicação de chaves. Ao adicionar o primeiro 6,<br>
ele simplesmente vai sobrescrevendo o conteúdo e como todos são 6,<br>
você tem o resultado obtido.<br>
<br>
[]'s<br>
<br>
Em 21 de julho de 2010 21:31, "Flávio R. Lopes"<br>
<<a moz-do-not-send="true" href="mailto:flavio.lopes@links.inf.br"
target="_blank">flavio.lopes@links.inf.br</a>> escreveu:<br>
<br>
<br>
<blockquote class="gmail_quote"
style="border-left: 1px solid rgb(204, 204, 204); margin: 0pt 0pt 0pt 0.8ex; padding-left: 1ex;">
Olá pessoal.<br>
<br>
Num dos exercícios que estou fazendo, uma das soluções (pelo menos que<br>
estou<br>
imaginando) seria colocar o conteúdo de um array dentro de um hash, mas<br>
quando os elementos são repetidos, só insere a primeira instância do<br>
elemento.<br>
<br>
Supondo um array com os elements:<br>
<br>
my @numeros = (1, 2, 3, 4, 5, 6, 6, 6, 5);<br>
<br>
my %hash = map { $_ => $_ } @numeros;<br>
<br>
while ( my ($chave, $valor) = each %hash ) {<br>
<br>
say "$chave => $valor";<br>
<br>
}<br>
<br>
<br>
Tenho como saída:<br>
6 => 6<br>
4 => 4<br>
1 => 1<br>
3 => 3<br>
2 => 2<br>
5 => 5<br>
<br>
<br>
Porque os outros dois elementos "6" e o último elemento "5" não são<br>
armazenados dentro do hash?<br>
Gostaria que produzisse a seguinte saída (como todos os 9 elementos do<br>
array):<br>
<br>
6 => 6<br>
6 => 6<br>
6 => 6<br>
4 => 4<br>
1 => 1<br>
3 => 3<br>
2 => 2<br>
5 => 5<br>
5 => 5<br>
<br>
Onde estou errando?<br>
<br>
Abraço,<br>
Flávio<br>
<br>
<br>
<br>
_______________________________________________<br>
SaoPaulo-pm mailing list<br>
<a moz-do-not-send="true" href="mailto:SaoPaulo-pm@pm.org"
target="_blank">SaoPaulo-pm@pm.org</a><br>
<a moz-do-not-send="true"
href="http://mail.pm.org/mailman/listinfo/saopaulo-pm" target="_blank">http://mail.pm.org/mailman/listinfo/saopaulo-pm</a><br>
<br>
<br>
<br>
</blockquote>
<br>
<br>
<br>
</blockquote>
_______________________________________________<br>
SaoPaulo-pm mailing list<br>
<a moz-do-not-send="true" href="mailto:SaoPaulo-pm@pm.org"
target="_blank">SaoPaulo-pm@pm.org</a><br>
<a moz-do-not-send="true"
href="http://mail.pm.org/mailman/listinfo/saopaulo-pm" target="_blank">http://mail.pm.org/mailman/listinfo/saopaulo-pm</a><br>
<br>
</blockquote>
<br>
<br>
<br>
</blockquote>
<br>
_______________________________________________<br>
SaoPaulo-pm mailing list<br>
<a moz-do-not-send="true" href="mailto:SaoPaulo-pm@pm.org"
target="_blank">SaoPaulo-pm@pm.org</a><br>
<a moz-do-not-send="true"
href="http://mail.pm.org/mailman/listinfo/saopaulo-pm" target="_blank">http://mail.pm.org/mailman/listinfo/saopaulo-pm</a><br>
</div>
</div>
</blockquote>
</div>
<br>
<br clear="all">
<br>
-- <br>
Bruno C. Buss<br>
<a moz-do-not-send="true" href="http://brunobuss.wordpress.com/">http://brunobuss.wordpress.com/</a><br>
<a moz-do-not-send="true" href="http://www.dcc.ufrj.br/%7Ebrunobuss/">http://www.dcc.ufrj.br/~brunobuss/</a><br>
</div>
<pre wrap="">
<fieldset class="mimeAttachmentHeader"></fieldset>
_______________________________________________
SaoPaulo-pm mailing list
<a class="moz-txt-link-abbreviated" href="mailto:SaoPaulo-pm@pm.org">SaoPaulo-pm@pm.org</a>
<a class="moz-txt-link-freetext" href="http://mail.pm.org/mailman/listinfo/saopaulo-pm">http://mail.pm.org/mailman/listinfo/saopaulo-pm</a></pre>
</blockquote>
<br>
</body>
</html>