Example Code - S3 

• Creating a bucket:

use Amazon::AwsSum::S3;
my $s3 = Amazon::AwsSum::S3->new();
$s3->access_key_id( $aws_access_key_id );
$s3->secret_access_key( $aws_secret_access_key );
$s3->CreateBucket({ Bucket => 'mybucket' });

• Putting an object:

$s3->PutObject({
    Bucket  => 'mybucket',
    Key     => 'test-file.jpg',
    headers => { 'Content-Type' => 'image/jpg' },
    content => $blob,
});