Perl

S3 Download File

See more Amazon S3 Examples

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

use chilkat();

$success = 0;

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

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

$http->put_AwsAccessKey("AWS_ACCESS_KEY");
$http->put_AwsSecretKey("AWS_SECRET_KEY");
$http->put_AwsRegion("us-west-2");
$http->put_AwsEndpoint("s3-us-west-2.amazonaws.com");

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

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

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