[Cascavel-pm] Duvida Text:CSV

[Otávio Fernandes]

Patty,

Fiz um exemplo com o Text::CSV::Simple, e funcionou, veja se este
código te ajuda:

$ cat csv.txt
Nome,data,end,"DD","H1","H2","H3","H4"
Name2,2005-05-20 00:00:00,MG,"01","69.6","-1","55.215","25.1231"
Name2,2005-05-20 03:00:00,SP,"02","-1","1.23","1.45","-1"

--
#!/usr/bin/perl -w

use strict;
use warnings;

use Text::CSV::Simple;
use Data::Dumper;

my $csv = new Text::CSV::Simple();

$csv->field_map(qw/nome data/);

my @data = $csv->read_file('csv.txt');

foreach ( @data ) {
	print "Debug -> ", Dumper $_, "\n";
}

__END__
--

Depois dá uma olhada aqui na CPAN (
http://search.cpan.org/~tmtm/Text-CSV-Simple-1.00/lib/Text/CSV/Simple.pm)
porque eu acho que neste módulo vai ter tudo o que você quer.

boa sorte,

-- 
 | --
 | Otávio Fernandes < otaviof | gmail | com >
 | FreeBSD 6.2 Release && GNU/Linux User: 283.396
 | (( Especial Programação )) http://geekbr.podcastbrasil.com/
 | --