use Test::Most;
use Text::vCard::Addressbook;
use Path::Tiny;
my $in_file = path('t/complete.vcf');
my $address_book = Text::vCard::Addressbook->load( [$in_file] );
my $vcard = $address_book->vcards->[0];
is $vcard->fullname, 'Bruce Banner, PhD', ', was not escaped';
done_testing;