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

时间:2012-10-06 07:04:00

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

我正在尝试使用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?

谢谢,

琳达

1 个答案:

答案 0 :(得分:11)

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

  

该方法的作用类似于add_key,但该值假定为a   本地文件系统上的文件名。该文件将被流式传输   然后在一个大块中加载到内存中。

类似的东西:

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

根据需要调整内容类型。