Mail::Addressbook::Convert::Tsv 1.1

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

SYNOPSIS

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;