(Perl) S3 Download Specific Version of File

Demonstrates how to download a file from the Amazon S3 service using the versionId query parameter.

Note: This example requires Chilkat v9.5.0.89 or later. (A problem regarding AwsSubResources w/ downloads was fixed shortly after the v9.5.0.88 release.)

Chilkat Perl Downloads Perl Module for Windows, Linux, Alpine Linux, MAC OS X, Solaris, FreeBSD, OpenBSD, Raspberry Pi and other single board computers

use chilkat();

# 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_S3Ssl(1);
$http->put_AwsRegion("us-east-1");
$http->put_AwsEndpoint("s3.amazonaws.com");
$http->put_AwsSubResources("versionId=x8UPzRsgskmbe55lEQvhLi25PQl2lcFH");

$bucketName = "chilkat100";
$objectName = "frenchUtf8.txt";
$localFilePath = "qa_output/frenchUtf8.txt";

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

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