<p>Mantovani, claro q precisa! Isso nao ta retornando uma string...</p>
<p><blockquote type="cite">On Feb 4, 2010 12:59 PM, "Daniel de Oliveira Mantovani" <<a href="mailto:daniel.oliveira.mantovani@gmail.com">daniel.oliveira.mantovani@gmail.com</a>> wrote:<br><br>Não precisa do join:<br>
sub merge{@b=split//,pop;@a=split//,pop;map{$a[$_].$b[$_]}0..@a+@b}<br>
<br>
mantovani@mantovani-desktop:~$ perl -MMerge -E 'say merge("dan",12)'<br>
d1a2n<br>
<p><font color="#500050"><br><br>2010/2/4 breno <<a href="mailto:breno@rio.pm.org">breno@rio.pm.org</a>>:<br>> e -2 tirando parenteses<br>><br>> sub merge{@b=split//,pop;@a=split...</font></p><font color="#888888">--<br>
"If you’ve never written anything thoughtful, then you’ve never had<br>
any difficult, important, or interesting thoughts. That’s the secret:<br>
people who don’t write, are people who don’t think."<br>
</font><p><font color="#500050">_______________________________________________<br>Rio-pm mailing list<br><a href="mailto:Rio-pm@pm.org">Rio-pm@pm.org</a><br>http://mail.pm.org...</font></p></blockquote></p>