696 |
$member_id = AddMemberToList( |
$member_id = AddMemberToList( |
697 |
list => 'My list', |
list => 'My list', |
698 |
email => 'e-mail@example.com', |
email => 'e-mail@example.com', |
699 |
name => 'Full Name' |
name => 'Full Name', |
700 |
|
ext_id => 42, |
701 |
); |
); |
702 |
|
|
703 |
=cut |
=cut |
707 |
|
|
708 |
if ($_[0] !~ m/^HASH/) { |
if ($_[0] !~ m/^HASH/) { |
709 |
return $nos->add_member_to_list( |
return $nos->add_member_to_list( |
710 |
list => $_[0], email => $_[1], name => $_[2], |
list => $_[0], email => $_[1], name => $_[2], ext_id => $_[4], |
711 |
); |
); |
712 |
} else { |
} else { |
713 |
return $nos->add_member_to_list( %{ shift @_ } ); |
return $nos->add_member_to_list( %{ shift @_ } ); |