I'm happy to send you my hourly rate for doing this work for you.
Otherwise, you've got half-working code of your own, several references to what is likely wrong with it, links to the documentation wherein you will find your answers, and a completely working hunk of code using a different approach.
--chargrill
s**lil*; $*=join'',sort split q**; s;.*;grr; &&s+(.(.)).+$2$1+; $; =
qq-$_-;s,.*,ahc,;$,.=chop for split q,,,reverse;print for($,,$;,$*,$/)
| [reply] [d/l] |
Thank you for the help
Your example at http://www.perlmonks.org/index.pl?node_id=525899 is very good!
I obtained to modify for what I need
Hapy new year =)
Muito obrigado pela ajuda,
O exemplo no endereço acima é muito bom!
Consegui modificar para o que preciso
| [reply] |