NAME

SYNOPSIS

use Data::v;

my $vdata = Data::v->new->decode([ '..', 't', 'vcf', 'aldo.vcf' ]);
my $vcard = $vdata->get_value('vcard');

print 'version:   ', $vcard->get_value('version'), "\n";
print 'full name: ', $vcard->get_value('fn'), "\n";
print 'email:     ', $vcard->get_value('email'), "\n";

my @cell_phones = $vcard->get_fields('tel');

use List::MoreUtils 'any';
my @cell_phones =
	map { $_->value->as_string }
	$vcard->get_fields('tel', 'type' => 'cell')
;
print 'cell:      ', join(', ', @cell_phones), "\n";

print "\n";

$vcard->set_value('email' => 'dada@internet');
$vcard->rm_fields('rev', 'photo', 'adr', 'X-MS-OL-DEFAULT-POSTAL-ADDRESS', 'label');

print $vdata->encode, "\n";

DESCRIPTION

SEE ALSO

http://tools.ietf.org/html/rfc2425 - A MIME Content-Type for Directory Information

http://tools.ietf.org/html/rfc2426 - vCard MIME Directory Profile

http://tools.ietf.org/html/rfc5545 - Internet Calendaring and Scheduling Core Object Specification (iCalendar)

AUTHOR

Jozef Kutej