Perl

S3 Download File

See more Amazon S3 Examples

Demonstrates how to download a file from the Amazon S3 service. Chilkat2 Perl

use strict;
use warnings;
use Chilkat2;

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

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

$http->AwsAccessKey('AWS_ACCESS_KEY');
$http->AwsSecretKey('AWS_SECRET_KEY');
$http->AwsRegion('us-west-2');
$http->AwsEndpoint('s3-us-west-2.amazonaws.com');

my $bucketName = 'chilkat.qa';
my $objectName = '/images/sea_creatures/starfish.jpg';
my $localFilePath = 'qa_output/starfish.jpg';

my $success = $http->S3_DownloadFile($bucketName, $objectName, $localFilePath);

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