(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.)
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";
}
|