[Cascavel-pm] Duvida Split
Luiz Gonzaga
lgonzaga em lncc.br
Terça Janeiro 23 09:27:05 PST 2007
Mande um arquivo csv de exemplo.
Luiz.
Em Terça 23 Janeiro 2007 15:16, Patty Silva escreveu:
> Ola Pessoal...
> Fiz um script para ler arquivos em formato CSV porem quando faco o FOREACH
> ele faz a quantidade de variaveis exeistente entre as virgulas
>
> script:
>
> opendir (DIR, $caminho) or die "Problemas ao abrir diretorio: $!";
>
> while (my $file = readdir(DIR))
> {
>
> next if $file eq '.' or $file eq '..';
>
> chdir($caminho) || die "\n *** Erro no diretorio $caminho ***";
>
> open(FH, "<$file") or die("Arquivo nao pode ser acessado");
>
> while ( $linha=<FH> )
> {
>
> @valor=split(/,/,$linha);
>
>
>
> foreach $campo (@valor)
> {
>
> chomp(@valor);
> $var = $valor[0];
> $var2 = $valor[1];
> $var3= $valor[2];
> $var4 = $valor[3];
>
> print " VAR: $var\n\n"; <------------ QUANDO MANDO
> IMPRIMIR isso ele IMPRIME 4 VEZES ou seja a quantidade de variaves entre ,
>
>
>
> }
> }
>
> }
>
>
> Como faco???????? :)
>
>
> Obrigada Pessoal......
>
>
> []ssssss
>
>
>
> __________________________________________________
> Fale com seus amigos de graça com o novo Yahoo! Messenger
> http://br.messenger.yahoo.com/
--
Luiz G. P. de Almeida
Analista de Sistemas
Laboratório Nacional de Computação Científica / MCT
Mais detalhes sobre a lista de discussão Cascavel-pm