如何使用Perl將圖像上傳到Amazon S3？

Question

我想用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？

感謝，

琳達

Answer 1

該代碼不會上傳的文件 - 它只是設置與鍵「testing.txt」到「T」相關聯的值。如果你想上傳一個文件，你可以使用add_key_filename方法：

的方法就像add_key除了值被假定爲一個 文件名的本地文件系統上。該文件將流式傳輸，然後 然後加載到內存中一大塊。

是這樣的：

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

根據需要調整內容類型。