Dackup::Target::S3 - Flexible file backup to/from Amazon S3
use Dackup; use Net::Amazon::S3; my $s3 = Net::Amazon::S3->new( aws_access_key_id => 'XXX', aws_secret_access_key => 'YYY', retry => 1, ); my $client = Net::Amazon::S3::Client->new( s3 => $s3 ); # You must have already created this bucket # see Net::Amazon::S3::Client my $bucket = $client->bucket( name => 'mybackups' ); my $source = Dackup::Target::Filesystem->new( prefix => '/home/acme/important/' ); my $destination = Dackup::Target::S3->new( bucket => $bucket, prefix => 'important_backup/', # optional ); my $dackup = Dackup->new( source => $source, destination => $destination, delete => 1, ); $dackup->backup;
This is a Dackup target for Amazon's Simple Storage Service.
Leon Brocard <email@example.com>
Copyright (C) 2009, Leon Brocard.
This module is free software; you can redistribute it or modify it under the same terms as Perl itself.