使用 Cassandra Perl 客户端驱动程序以编程方式访问 Amazon Keyspaces - Amazon Keyspaces（Apache Cassandra 兼容）

本文属于机器翻译版本。若本译文内容与英语原文存在差异，则一律以英文原文为准。

使用 Cassandra Perl 客户端驱动程序以编程方式访问 Amazon Keyspaces

本部分介绍了如何使用 Perl 客户端驱动程序连接 Amazon Keyspaces。在本代码示例中，我们使用的是 Perl 5。Amazon Keyspaces 要求使用传输层安全性协议 (TLS) 来帮助保护与客户端的连接。

重要

Amazon KeyspacesCertificents 正在过渡到亚马逊信任服务 (ATS) 层次结构。确保您的环境信任 Amazon 根 CAs 1—4，以避免在此轮换期间出现连接错误。Perl 驱动程序不会验证服务器的 Amazon SSL 证书，这意味着无法确认您是否能连接到 Amazon Keyspaces。第二步，务必要在连接 Amazon Keyspaces 时配置驱动程序以使用 TLS，这可以确保在客户端和服务器之间传输的数据经过加密。

  1. 从 https://metacpan.org/pod/DBD::Cassandra 下载 Cassandra DBI 驱动程序，并将其安装到您的 Perl 环境中。具体步骤取决于您的环境。下面是一个常见示例。

    cpanm DBD::Cassandra

  2. 为应用程序创建一个文件。

    touch cqlapp.pl

  3. 将以下示例代码添加到 cqlapp.pl 文件。

    use DBI;
my $user = "ServiceUserName";
my $password = "ServicePassword";
my $db = DBI->connect("dbi:Cassandra:host=cassandra.us-east-2.amazonaws.com;port=9142;tls=1;", 
$user, $password);

my $rows = $db->selectall_arrayref("select * from system_schema.keyspaces"); 
print "Found the following Keyspaces...\n"; 
for my $row (@$rows) { 
      print join(" ",@$row['keyspace_name']),"\n"; 
} 

$db->disconnect;
    重要

    按照以下步骤操作，确保和与您在生成服务专用凭证时获得的用户名和密码ServicePassword相匹配。ServiceUserName 创建用于通过编程方式访问 Amazon Keyspaces 的服务特定凭证。

    注意

    有关可用端点的列表，请参阅Amazon Keyspaces 的服务端点。

  4. 运行应用程序。

    perl cqlapp.pl