Mail::Addressbook::Convert::Spry - from Spry Mail Addressbook
use strict;
use Mail::Addressbook::Convert::Spry;
my $SPRY = new Mail::Addressbook::Convert::Spry();
my $SpryInFile ="spry.als"; # name of the file containing the Spry data # it is found in the Spry folder
# Convert Spry to Standard Intermediate format
# see documentation for details on format.
my $raIntermediate = $SPRY->scan(\$SpryInFile);
# This will also work
#my @SpryInArray = @arrayContainingTheSpryData;
#my $raIntermediate = $SPRY->scan(\@SpryInArray);
print join "", @$raIntermediate;
Perl, version 5.001 or higher
Carp
This module is meant to be used as part of the Mail::Addressbook::Convert distribution.
It can convert a Spry addressbook to a Standard Intermediate format(STF) and a STF to TSV As part of the larger distribution, it will allow conversion between Spry and many other formats.
To use to convert between Spry and Eudora as an example, you would do the following
use Mail::Addressbook::Convert::Eudora;
my $Spry = new Mail::Addressbook::Convert::Spry();
my $Eudora = new Mail::Addressbook::Convert::Eudora();
my $spryInFile ="sprySample.txt"; # name of the file containing the Spry data
my $raIntermediate = $Spry->scan(\$spryInFile);
my $raEudora = $Eudora->output($raIntermediate); # reference to an array containing a Eudora addressbook
Standard Intermediate Format(STF) :
The addressbook format that is used as an intermediate between conversions. It is rfc822 compliant and can be used directly as a Eudora addressbook. Do not use a Eudora addressbook as an STF. Some versions of Eudora use a format, that while RFC822 compliant, will not work as an STF. Run the Eudora addressbook through $Eudora->scan()
Spry addressbook:
They are in the Spry folder with an ".als" extension
no arguments needed.
Input : a reference to an array containing a tsv file or a reference to a scalar containing the file name with the tsv data. Returns: a reference to a STF ( see above).
There is no output method. That is you cannot convert to a Spry format.
This only converts email address, aliases, and mailing lists. Phone numbers, postal addresses and other such data are not converted.
This code is derived from the code used on www.interguru.com/mailconv.htm . The site has been up since 1996 ( but ldif was only included on 1997, when Netscape 3 started using it.) The site gets about 8000 unique visitors a month, many of whom make addressbook conversions. The code has been well tested.
Original Version 2001-Sept-09
Copyright (c) 2001 Joe Davidson. All rights reserved. This program is free software; you can redistribute it and/or modify it under the terms of the Perl Artistic License (see http://www.perl.com/perl/misc/Artistic.html). or the GPL copyleft license ( http://www.gnu.org/copyleft/gpl.html)
Mail::Addressbook::Convert was written by Joe Davidson <jdavidson@interguru.com> in 2001.
To install MAIL::CONVERT, copy and paste the appropriate command in to your terminal.
cpanm
cpanm MAIL::CONVERT
CPAN shell
perl -MCPAN -e shell install MAIL::CONVERT
For more information on module installation, please visit the detailed CPAN module installation guide.