my $vevent = Data::ICal::Entry::Event->new();
    $vevent->add_properties(
        attendee => [ 'mailto:gam3(allen)@gam3.bet',
            { 'CN' => 'G. Allen Morris III',
              'ROLE' => 'REQ-PARTICIPANT',
              'PARTSTAT' => 'NEEDS-ACTION',
              'RSVP' => 'TRUE'
            },
        ],
    );