my $s3 = Net::Amazon::S3->new({
    aws_access_key_id     => $conf->{access_key},
    aws_secret_access_key => $conf->{secret_key},
});

my $bucket = $s3->bucket( $conf->{bucket} );

my $key = $conf->{path}{ $op_env } . '/some_name';

$bucket->add_key( $key, $data ) or $die($s3->err . ": " . $s3->errstr);