Re^6: Need to print bucket and filename which is uploaded on S3 storage

add_bucket is failing when trying to add the same.

use Amazon::S3;
my $file_name = "filename.txt";
my $bucketName = "forest-upload";

my $s3 = Amazon::S3->new({
 aws_access_key_id => "XX",
 aws_secret_access_key => "XX",
 retry => 1
});

print $s3;
print "\n";
my $result = $s3->buckets();
my $bucket_name = 'Test-Bucket';
my $bucket = $s3->add_bucket( { bucket => $bucket_name } ) or die $s3-
+>errstr ;
[download]

Out of this script is Amazon::S3=HASH(0x25dac28) Died at Amazon_bucket.pl line 18.

Comment on Re^6: Need to print bucket and filename which is uploaded on S3 storage Download Code

Replies are listed 'Best First'.
Re^7: Need to print bucket and filename which is uploaded on S3 storage by hippo (Archbishop) on Aug 21, 2019 at 10:21 UTC
Died at Amazon_bucket.pl line 18. Your script doesn't have 18 lines therefore the script you have shown is not the script you are running.	[reply]
Re^8: Need to print bucket and filename which is uploaded on S3 storage by coolsaurabh (Acolyte) on Aug 21, 2019 at 10:57 UTC
It could be that the script shown didn't have 18 lines of code but if you could have seen the message carefully,you would have got the message what I was trying to convey. my $bucket = $s3->add_bucket( { bucket => $bucket_name } ) or die $s3->errstr ; Above statement is getting failed when run.	[reply]