<div dir="ltr">Ou um <b>echo -n</b></div><div class="gmail_extra"><br><div class="gmail_quote">Em 6 de março de 2017 13:52, Aureliano Guedes <span dir="ltr"><<a href="mailto:guedes_1000@hotmail.com" target="_blank">guedes_1000@hotmail.com</a>></span> escreveu:<br><blockquote class="gmail_quote" style="margin:0 0 0 .8ex;border-left:1px #ccc solid;padding-left:1ex">



<div>

<div id="m_7599888288072984839divtagdefaultwrapper" style="font-size:12pt;color:#000000;font-family:Calibri,Arial,Helvetica,sans-serif" dir="ltr">
<p>Verdade, um simples chomp; antes do código resolve.<br>
<br>
To enferrujado <br>
<br>
</p>
</div>
<hr style="display:inline-block;width:98%">
<div id="m_7599888288072984839divRplyFwdMsg" dir="ltr"><font face="Calibri, sans-serif" style="font-size:11pt" color="#000000"><b>From:</b> Rio-pm <rio-pm-bounces+guedes_1000=<a href="mailto:hotmail.com@pm.org" target="_blank">ho<wbr>tmail.com@pm.org</a>> on behalf of Nicole Scherer <<a href="mailto:bionica2007-perl@yahoo.com" target="_blank">bionica2007-perl@yahoo.com</a>><br>
<b>Sent:</b> Monday, March 6, 2017 4:30:39 PM<span class=""><br>
<b>To:</b> Perl Mongers Rio de Janeiro<br>
</span><span class=""><b>Subject:</b> Re: [Rio-pm] Função uniq com bug ou erro no codigo?</span></font>
<div> </div>
</div>
<div>
<div style="color:#000;background-color:#fff;font-family:Helvetica Neue,Helvetica,Arial,Lucida Grande,sans-serif;font-size:13px">
<div id="m_7599888288072984839yui_3_16_0_ym19_1_1488817782016_6148">Oi Aureliano,</div>
<div id="m_7599888288072984839yui_3_16_0_ym19_1_1488817782016_6149"><br id="m_7599888288072984839yui_3_16_0_ym19_1_1488817782016_6150">
</div>
<div id="m_7599888288072984839yui_3_16_0_ym19_1_1488817782016_6151">Já testaste usar um chomp antes do split?</div>
<div id="m_7599888288072984839yui_3_16_0_ym19_1_1488817782016_6152"><br id="m_7599888288072984839yui_3_16_0_ym19_1_1488817782016_6153">
</div>
<div id="m_7599888288072984839yui_3_16_0_ym19_1_1488817782016_6154">[]'s</div>
<div id="m_7599888288072984839yui_3_16_0_ym19_1_1488817782016_6155">Nicole<br id="m_7599888288072984839yui_3_16_0_ym19_1_1488817782016_6156">
</div>
<div id="m_7599888288072984839yui_3_16_0_ym19_1_1488817782016_6157"><span id="m_7599888288072984839yui_3_16_0_ym19_1_1488817782016_6158"></span></div>
<br id="m_7599888288072984839yui_3_16_0_ym19_1_1488817782016_6159">
<div class="m_7599888288072984839qtdSeparateBR"><br>
<br>
</div>
<div class="m_7599888288072984839yahoo_quoted" style="display:block">
<div style="font-family:Helvetica Neue,Helvetica,Arial,Lucida Grande,sans-serif;font-size:13px">
<div style="font-family:HelveticaNeue,Helvetica Neue,Helvetica,Arial,Lucida Grande,sans-serif;font-size:16px"><div><div class="h5">
<div dir="ltr"><font size="2" face="Arial">Em Domingo, 5 de Março de 2017 13:36, Aureliano Guedes <<a href="mailto:guedes_1000@hotmail.com" target="_blank">guedes_1000@hotmail.com</a>> escreveu:<br>
</font></div>
<br>
<br>
</div></div><div class="m_7599888288072984839y_msg_container"><div><div class="h5">
<div id="m_7599888288072984839yiv3095987251">
<div dir="ltr">
<div id="m_7599888288072984839yiv3095987251divtagdefaultwrapper" style="font-size:12pt;color:#000000;font-family:Calibri,Arial,Helvetica,sans-serif" dir="ltr">
<div>Ola,</div>
<div>Caros Monges.<br>
<br>
Estou com uma pequena dúvida.<br>
Estou usando a função uniq (List::Util e List::MoreUtils) para reduzir a redundância de um array.</div>
<div><br>
</div>
<div><span>echo "SP+TM+TM+TM+TM+TM+TM+TM+TM+<wbr>TM+TM+TM" | perl -MList::Util='uniq' -MDDP -ne '@a = uniq (split (/\+/, $_)); print "\n"; p @a; print "\n"'</span><br>
</div>
<div><span><br>
</span></div>
<div>Separa os elementos pelo '+' e depois remove a redundância. Acontece que o ultimo elemento for redundante ele não é eliminado.<br>
<br>
Alguém sabe o porque disso??<br>
<br>
Alguma sujestão de como reverter sem q eu tenha que criar um script pra isso ou minha propria rotina uniq??<br>
<br>
Desde já grato.</div>
</div>
</div>
</div>
<br></div></div><span class="">
______________________________<wbr>_________________<br>
Rio-pm mailing list<br>
<a href="mailto:Rio-pm@pm.org" target="_blank">Rio-pm@pm.org</a><br>
<a href="http://mail.pm.org/mailman/listinfo/rio-pm" target="_blank">http://mail.pm.org/mailman/<wbr>listinfo/rio-pm</a><br>
<br>
</span></div>
</div>
</div>
</div>
</div>
</div>
</div>

<br>______________________________<wbr>_________________<br>
Rio-pm mailing list<br>
<a href="mailto:Rio-pm@pm.org">Rio-pm@pm.org</a><br>
<a href="http://mail.pm.org/mailman/listinfo/rio-pm" rel="noreferrer" target="_blank">http://mail.pm.org/mailman/<wbr>listinfo/rio-pm</a><br></blockquote></div><br></div>