Perl

S3 Upload String

See more Amazon S3 Examples

Demonstrates how to upload an in-memory string to the Amazon S3 service. 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 $bucketName = 'chilkattestbucket';

my $objectName = 'helloWorld.txt';

# The charset indicates the character encoding to be used.
# Internal to the S3_UploadString method, the characters
# are converted to this encoding prior to uploading.
my $charset = 'utf-8';

# The Content-Type has the form  type/subtype, such as application/pdf, application/json, image/jpeg, etc.
# See Explaining Content-Types
my $contentType = 'text/plain';

my $objectContent = 'Hello World!';

# Upload the string.
# This creates an object named "helloWorld.txt" in the
# bucket "chilkattestbucket" containing the text "Hello World!";
my $success = $http->S3_UploadString($objectContent, $charset, $contentType, $bucketName, $objectName);

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