Perl
Perl
Akeneo: Create New Family
See more HTTP Misc Examples
Demonstrates how to create a new family.Chilkat Perl Downloads
use chilkat();
$success = 0;
# This example requires the Chilkat API to have been previously unlocked.
# See Global Unlock Sample for sample code.
$http = chilkat::CkHttp->new();
# Use your previously obtained access token.
# See Get Akeneo Access Token
$http->put_AuthToken("access_token");
# Build the following JSON to be sent in the request body:
# Use this online tool to generate the code from sample JSON:
# Generate Code to Create JSON
# {
# "code": "caps",
# "attributes": [
# "sku",
# "name",
# "description",
# "price",
# "color",
# "picture"
# ],
# "attribute_as_label": "name",
# "attribute_as_image": "picture",
# "attribute_requirements": {
# "ecommerce": [
# "sku",
# "name",
# "description",
# "price",
# "color"
# ],
# "tablet": [
# "sku",
# "name",
# "description",
# "price"
# ]
# },
# "labels": {
# "en_US": "Caps",
# "fr_FR": "Casquettes"
# }
# }
#
$json = chilkat::CkJsonObject->new();
$json->UpdateString("code","caps");
$json->UpdateString("attributes[0]","sku");
$json->UpdateString("attributes[1]","name");
$json->UpdateString("attributes[2]","description");
$json->UpdateString("attributes[3]","price");
$json->UpdateString("attributes[4]","color");
$json->UpdateString("attributes[5]","picture");
$json->UpdateString("attribute_as_label","name");
$json->UpdateString("attribute_as_image","picture");
$json->UpdateString("attribute_requirements.ecommerce[0]","sku");
$json->UpdateString("attribute_requirements.ecommerce[1]","name");
$json->UpdateString("attribute_requirements.ecommerce[2]","description");
$json->UpdateString("attribute_requirements.ecommerce[3]","price");
$json->UpdateString("attribute_requirements.ecommerce[4]","color");
$json->UpdateString("attribute_requirements.tablet[0]","sku");
$json->UpdateString("attribute_requirements.tablet[1]","name");
$json->UpdateString("attribute_requirements.tablet[2]","description");
$json->UpdateString("attribute_requirements.tablet[3]","price");
$json->UpdateString("labels.en_US","Caps");
$json->UpdateString("labels.fr_FR","Casquettes");
$json->put_EmitCompact(0);
# Show the JSON to be sent..
print $json->emit() . "\r\n";
$url = "http://pim.my-akeneo-site.com/api/rest/v1/families";
$resp = chilkat::CkHttpResponse->new();
$success = $http->HttpJson("POST",$url,$json,"application/json",$resp);
if ($success == 0) {
print $http->lastErrorText() . "\r\n";
exit;
}
print "Response Status Code: " . $resp->get_StatusCode() . "\r\n";
print "Response Body: " . "\r\n";
print $resp->bodyStr() . "\r\n";