($original,$troca) = split(/\|-\|/,$variavel); saijo wrote:
Salve galera!
Bom os meu problema e� o seguinte:
Tenho um arquivo chamado "strings.txt" que possue a seguinte estrutura:
----------------------------------
original1|-|troca1
original2|-|troca2
....
originalN|-|trocaN
-----------------------------------
Ou seja possue um estrutura de palavras "originais" e "trocas" separadas por "|-|"
No meu script perl preciso abrir este arquivo e separar os "original" num array e o "troca" em outro array.
_______________________________________________________________ Sair da Lista: http://www2.fugspbr.org/mailman/listinfo/fugspbr Historico: http://www4.fugspbr.org/lista/html/FUG-BR/
