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 });

    $log->info("Uploading $key to S3");

    $bucket->add_key($key, join("\n", @rows, ''))
        or $log->fatal($s3->err . ': ' . $s3->errstr);