(Perl) Shopware 6 - Delete Product

See more Shopware 6 Examples

Delete a product.

Chilkat Perl Downloads Perl Module for Windows, MacOS, Linux, Alpine Linux, Solaris

use chilkat();

# This example assumes the Chilkat API to have been previously unlocked.
# See Global Unlock Sample for sample code.

$http = chilkat::CkHttp->new();

# Load the access token previously obtained in Shopware 6 OAuth2 Client Credentials
$jsonToken = chilkat::CkJsonObject->new();
$jsonToken->LoadFile("qa_data/tokens/shopware6.json");

# This causes the "Authorization: Bearer <access_token>" header to be added.
$http->put_AuthToken($jsonToken->stringOf("access_token"));

# Delete a product by the product id.
# See Find Shopware 6 Product by Name for sample code to find a product id given the name.

# We need to send a DELETE request like this:
# DELETE /api/v3/product/d195dabb53cf46d096bd9a8726d82558

$http->SetUrlVar("id","d195dabb53cf46d096bd9a8726d82558");

# If successful (204 response code), then the jsonStr will be empty.
# Otherwise it will be a JSON error message.
$jsonStr = $http->quickDeleteStr("https://my-shopware-6-shop.de/api/v3/product/{$id}");
if ($http->get_LastMethodSuccess() == 0) {
    print $http->lastErrorText() . "\r\n";
    exit;
}

# A 204 status code indicates success.
$respStatusCode = $http->get_LastStatus();
print "Response status code for DELETE: " . $respStatusCode . "\r\n";

# This will be non-empty if an error occurred.
print $jsonStr . "\r\n";