Mail::Addressbook::Convert::Tsv 1.1 review

by on

License: Perl Artistic License
File size: 29K
Developer: Joe Davidson
0 stars award from

Mail::Addressbook::Convert::Tsv is a Perl module that can convert to and from Tsv ( Tab Separated )formatted addressbooks.


use strict;
use Mail::Addressbook::Convert::Tsv;
my $TSV = new Mail::Addressbook::Convert::Tsv();
my $TsvInFile ="csvSample.txt"; # name of the file containing the csv data
# Convert Tsv to Standard Intermediate format
# see documentation for details on format.
my $raIntermediate = $TSV->scan($CsvInFile);
# This will also work
#my @TsvInArray = @arrayContainingTheCsvData;
#my $raIntermediate = $csv->scan(@TsvInArray);
# Convert back to Tsv
my $raTsvOut = $TSV->output($raIntermediate);
print join "", @$raIntermediate;
print "nnnn";
print join "", @$raTsvOut;

Perl, version 5.001 or higher

Mail::Addressbook::Convert::Tsv 1.1 search tags