Parent Directory | Revision Log
SOAP now works, return member ID for add_member_to_list
1 | #!/usr/bin/perl -w |
2 | |
3 | use SOAP::Lite; #+trace => 'debug'; |
4 | my $HOST = "http://localhost/~dpavlin/notice-sender/soap.cgi"; |
5 | my $NS = "http://localhost/Nos/SOAP/"; |
6 | my $soap = SOAP::Lite |
7 | ->readable(1) |
8 | ->uri($NS) |
9 | ->proxy($HOST); |
10 | |
11 | print "added member ID ",$soap->AddMemberToList({ |
12 | list => 'My list', |
13 | email => 'dpavlin@rot13.org', |
14 | name => 'Dobrica Pavlinusic', |
15 | })->result,"\n"; |
16 | |
17 | print "added message ID ",$soap->AddMessageToList({ |
18 | list => 'My list', |
19 | message => 'To: member@example.com |
20 | From: mylist@example.com |
21 | Subject: text |
22 | |
23 | This is a dummy test |
24 | ', |
25 | })->result,"\n"; |
26 | 1; |
Name | Value |
---|---|
svn:executable | * |
ViewVC Help | |
Powered by ViewVC 1.1.26 |