Perl
Perl
WIN Air Freight Login POST Request
See more HTTP Misc Examples
Demonstrates the "login" POST method endpoint to obtain an initial authToken as a cookie. Each API request will return a fresh authToken cookie which must be passed back to WIN in the next API request.Chilkat Perl Downloads
use chilkat();
$success = 0;
# This example assumes the Chilkat HTTP API to have been previously unlocked.
# See Global Unlock Sample for sample code.
$http = chilkat::CkHttp->new();
# Set the "Accept" header to tell the web server that we'll accept an XML response.
$http->put_Accept("application/xml");
# Tell Chilkat to cache any received cookies to files in a particular directory
$http->put_CookieDir("c:/qa_data/cookies");
$http->put_SaveCookies(1);
$xml = chilkat::CkXml->new();
$xml->put_Tag("LogOnModel");
$xml->NewChild2("UserName",'win-air-freight-user@company.com');
$xml->NewChild2("Password","win-air-freight-password");
$xml->put_EmitXmlDecl(0);
$httpRequestBody = $xml->getXml();
$resp = chilkat::CkHttpResponse->new();
$success = $http->HttpStr("POST","http://integration.winwebconnect.com/api/v1/Login",$httpRequestBody,"utf-8","application/xml",$resp);
if ($success == 0) {
print $http->lastErrorText() . "\r\n";
exit;
}
$xmlResponse = chilkat::CkXml->new();
$xmlResponse->LoadXml($resp->bodyStr());
# See below for an example XML response body.
print "Response Body:" . "\r\n";
print $xmlResponse->getXml() . "\r\n";
print "---" . "\r\n";
print "Response Header:" . "\r\n";
print $resp->header() . "\r\n";
# An example resp header:
#
# Cache-Control: no-cache
# Pragma: no-cache
# Content-Length: 1671
# Content-Type: application/xml; charset=utf-8
# Expires: -1
# Set-Cookie: authToken=1467EC8A5D2F1390F89F9DB65AAAAB5C709D1AE7275B72B6DDBDA44C54AE5D5C19648F76AAB12C9D9E2690F0DD69BE6E1C0F6D725C9392E99E1904A6B76D7852948C01A49E2FF20914092843C062778B91EE7497DDF4C1AC4117110E414195C9726E3467BD98094437044A8E94F1BCA1; path=/; HttpOnly
# Access-Control-Allow-Origin: http://integration.winwebconnect.com
# Date: Mon, 21 Nov 2016 21:29:57 GMT
print "Success." . "\r\n";
# An example XML response body:
# -----------------------------
# <?xml version="1.0" encoding="utf-8" ?>
# <AuthResponseDTO>
# <LastLogin>2016-11-21T21:29:58.229986Z</LastLogin>
# <UserDetails>
# <ContactID>16528</ContactID>
# <AgentID>96592</AgentID>
# <FirstName>System</FirstName>
# <LastName>User</LastName>
# <Email>test@company.com</Email>
# <JobTitle />
# <ContactNumber />
# <IsActivated>true</IsActivated>
# <OperatedBy />
# <AddressBookID />
# <Permissions>integrationapi</Permissions>
# <ContactType>Primary</ContactType>
# <UCTReferer />
# <UCTIsCaptcha>false</UCTIsCaptcha>
# <UATReferer />
# <UATIsCaptcha>false</UATIsCaptcha>
# <Username>test@company.com</Username>
# </UserDetails>
# <AgentDetails>
# <AgentID>96592</AgentID>
# <AgentName>My Company</AgentName>
# <AccountNumber />
# <IATACode />
# <Address1>P.O. Box 555</Address1>
# <Address2 />
# <Place />
# <StateProvince>NC</StateProvince>
# <City>
# <Code>USBFO</Code>
# <Name>Raleigh</Name>
# </City>
# <Country>
# <Code>US</Code>
# <Name>US - United States</Name>
# </Country>
# <ZipCode>28522</ZipCode>
# <Email />
# <Phone />
# <Fax />
# <IsEAirwayBill>false</IsEAirwayBill>
# <EYProgram>false</EYProgram>
# <WhiteLabelMobileApp>false</WhiteLabelMobileApp>
# <Limits>
# <UCTSearchesRemaining />
# <UATSearchesRemaining />
# <AgentID>96592</AgentID>
# </Limits>
# <Permissions>integrationapi</Permissions>
# </AgentDetails>
# <UserPreferences>
# <AboutUs />
# <MOTD />
# <Language>en-US</Language>
# <Currency>USD</Currency>
# <UnitSystem>Metric</UnitSystem>
# <TimeZone>
# <TheID>450</TheID>
# <KeyIdentifier>TimeZone</KeyIdentifier>
# <KeyValue>GMT</KeyValue>
# <KeyDescription>(GMT-11:00)UTC-11</KeyDescription>
# <IsDefault>false</IsDefault>
# </TimeZone>
# <DateFormat>dd-MMM-yyyy</DateFormat>
# <TimeFormat>h:mm t</TimeFormat>
# <Controls />
# <ContactEmail />
# </UserPreferences>
# <Version>
# <APIVersion>3.4.0.0ah8</APIVersion>
# <UIVersion>3.1</UIVersion>
# </Version>
# <NumNonMSDBContacts />
# </AuthResponseDTO>
#