<p>Nao da pra fazer tudo com query nao!<br>
Tem varias regras q nao coloquei pra simplificar<br>
Por exemplo, vem vc sem email, mas com fone.<br>
Eu cadastro vc com id 1<br>
Depois vem vc de outra origem com email, mas sem fone.<br>
Pela regra, vc nao eh vc, pois soh bateu o nome<br>
Entao entra um novo cadastro pra vc, com id 2<br>
Supondo que eu mandei arquivos pro cliente falando sobre o id 1,2 nunca mais posso perder essa referencia<br>
dois messes depois me enviam de novo vc, so q com fone/email. Entao eu junto os 2 cadastros e transfomo em 1 novo, com as referencia dos antigos</p>
<p>Entao, o perl soltou as 1 da madruga, 8 hr parado. Os proximos, foram tds no segundo seguinte do kill.</p>
<p>O kill -9 $$ funfou</p>
<p>Mas podem dar dicas de bancos</p>
<p><blockquote type="cite">Em set 29, 2010 11:38 AM, &quot;Eden Cardim&quot; &lt;<a href="mailto:edencardim@gmail.com">edencardim@gmail.com</a>&gt;escreveu:<br><br>2010/9/29 Eden Cardim &lt;<a href="mailto:edencardim@gmail.com">edencardim@gmail.com</a>&gt;:<br>

<p><font color="#500050">&gt; insert into dedup (id, email, foo, bar) select id, min(email),
&gt; min(foo), min(bar) from dup group...</font></p>*ahem*, viajei, é o que dá tentar programar antes de tomar café, corrigindo:<br>
<br>
insert into dedup (id, email, foo, bar) select min(id), email,<br>
<p><font color="#500050">min(foo), min(bar) from dup group by email;

</font></p><p><font color="#500050">-- 
   Eden Cardim       Need help with your Catalyst or DBIx::Class project?
  Code Monkey         ...</font></p></blockquote></p>