[Cascavel-pm] editar string
Eden Cardim
edencardim em gmail.com
Quarta Maio 9 13:38:12 PDT 2007
On 5/9/07, lgonzaga em lncc.br <lgonzaga em lncc.br> wrote:
> Esta ocorrendo pois você está colocando o "." antes de TODOS os valores de
> $u.
>
> Como você disse que está começando a aprender Perl, saiba que existem meios
> mais fáceis e rápidos de fazer o que você quer.
>
> Dentro do loop "foreach $o (@arquivo) {"
> basta você usar o mecanismo de substituição das expressões regulares:
>
> $o =~ s/\.[0-9]{6,8}//;
Eu usaria um join:
<sai isso>
$string = "";
foreach $u (@arquivo2) {
$string .= ".$u";
}
</sai isso>
<entra isso>
$string = join ', ', @arquivo2;
</entra isso>
--
Eden Cardim
Instituto Baiano de Biotecnologia
Núcleo de Biologia Computacional e Gestão de Informações Biotecnológicas
Laboratório de Bioinformática
Mais detalhes sobre a lista de discussão Cascavel-pm