使用 Cassandra Perl 客户端驱动程序以编程方式访问亚马逊Keyspaces - Amazon Keyspaces (for Apache Cassandra)
Amazon Web Services 文档中描述的 Amazon Web Services 服务或功能可能因区域而异。要查看适用于中国区域的差异，请参阅中国的 Amazon Web Services 服务入门。

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

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

本节说明了如何使用 Perl 客户端驱动程序连接到 Amazon Keyspaces。在此代码示例中，我们使用了 Perl 5。Amazon Keyspaces 需要使用传输层安全性 (TLS) 来帮助保护与客户端的连接。

重要

为了创建安全连接，我们的代码示例在建立 TLS 连接之前使用 Starfield 数字证书对服务器进行身份验证。Perl 驱动程序不验证服务器的 Amazon SSL 证书，这意味着您无法确认您正在连接亚马逊Keyspaces。第二步，仍然需要将驱动程序配置为在连接到 Amazon Keyspaces 时使用 TLS，并确保在客户端和服务器之间传输的数据经过加密。

  1. 从中下载 Cassandra DBI 驱动程序https://metacpan.org/pod/DBD::Cassandra并将驱动程序安装到您的 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;
    重要

    确保ServiceUserName和ServicePassword按照以下步骤与您在生成服务特定凭证时获得的用户名和密码相匹配生成服务特定凭证.

    注意

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

  4. 运行应用程序。

    perl cqlapp.pl