Difference between revisions of "Perl ModifyUser"

From Rackspace Email & Apps API
Jump to: navigation, search
(New page: <nowiki>#!/usr/bin/perl -w</nowiki><br> <br> use strict;<br> use SOAP::Lite;<br> <br> my $service = "<nowiki>https://admin.webmail.us/mailaccounts/mailaccounts.wsdl</nowiki>";<br> <br> my ...)
 
(No difference)

Latest revision as of 16:57, 25 August 2008

#!/usr/bin/perl -w

use strict;
use SOAP::Lite;

my $service = "https://admin.webmail.us/mailaccounts/mailaccounts.wsdl";

my $resellerUsername = "someadmin";
my $resellerPassword = "somepasswd";

my $hostName = "mydomain.com";
my $userID = "myuser";
my $newpasswd = "mynewpasswd";

my @result = SOAP::Lite
-> service($service)
-> ModifyUser($resellerUsername, $resellerPassword, $hostName, $userID, $newpasswd, 1,"","","","","","","","","","");

print $result[0]."\n\n";