Perl

S3 Create Bucket

See more Amazon S3 Examples

Demonstrates how to create a new bucket. Chilkat2 Perl

use strict;
use warnings;
use Chilkat2;

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

my $http = Chilkat2::Http->new;

# Insert your access key here:
$http->AwsAccessKey('ABQXXABC83ABCDEFVQXX');

# Insert your secret key here:
$http->AwsSecretKey('XXXXYYYYabcdABCD12345678xxxxyyyyzzzz');

my $success = $http->S3_CreateBucket('chilkattestbucket');

if (!$success) {
    print $http->LastErrorText, "\n";
} else {
    print "Bucket created.\n";
}