Perl

S3 Create Bucket

See more Amazon S3 Examples

Demonstrates how to create a new bucket. Perl

use chilkat();

$success = 0;

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

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

# Insert your access key here:
$http->put_AwsAccessKey("ABQXXABC83ABCDEFVQXX");

# Insert your secret key here:
$http->put_AwsSecretKey("XXXXYYYYabcdABCD12345678xxxxyyyyzzzz");

$success = $http->S3_CreateBucket("chilkattestbucket");

if ($success != 1) {
    print $http->lastErrorText() . "\r\n";
}
else {
    print "Bucket created." . "\r\n";
}