如何使用 Perl 将图像上传到 Amazon S3？

【问题标题】：How To Upload Images to Amazon S3 Using Perl?如何使用 Perl 将图像上传到 Amazon S3？
【发布时间】：2012-10-06 07:04:00
【问题描述】：

我正在尝试使用 Perl 将文件上传到 S3。

根据本模块：

http://metacpan.org/pod/Amazon::S3::Bucket

...以下代码将上传文本文件：

# create resource with meta data (attributes)
my $keyname = 'testing.txt';
my $value   = 'T';
$bucket->add_key(
   $keyname, $value,
   {   content_type        => 'text/plain',
       'x-amz-meta-colour' => 'orange',
   }
);

但是，如何将图像（GIF、JPEG、PNG）上传到 S3？

谢谢，

琳达

【问题讨论】：

标签： perl upload amazon-s3 amazon-web-services amazon

【解决方案1】：

该代码不会上传文件 - 它只是将与键“testing.txt”关联的值设置为“T”。如果要上传文件，可以使用add_key_filename 方法：

该方法的工作原理与 add_key 类似，只是该值被假定为本地文件系统上的文件名。该文件将被流式传输然后以一大块加载到内存中。

类似：

$bucket->add_key_filename(
    'image-key.jpg',
    'local-filename.jpg',
    {
        content_type => 'image/jpeg',
    }
);

根据需要调整内容类型。

【讨论】：