As traduções são geradas por tradução automática. Em caso de conflito entre o conteúdo da tradução e da versão original em inglês, a versão em inglês prevalecerá.
Esta seção mostra como se conectar ao Amazon Keyspaces usando um driver de cliente Perl. Para esse exemplo de código, usamos o Perl 5. O Amazon Keyspaces exige o uso do Transport Layer Security (TLS) para ajudar a proteger as conexões com os clientes.
Importante
Para criar uma conexão segura, nossos exemplos de código usam o certificado digital Starfield para autenticar o servidor antes de estabelecer a TLS conexão. O driver Perl não valida o SSL certificado Amazon do servidor, o que significa que você não pode confirmar que está se conectando ao Amazon Keyspaces. A segunda etapa, configurar o driver a ser usado ao se conectar TLS ao Amazon Keyspaces, ainda é necessária e garante que os dados transferidos entre o cliente e o servidor sejam criptografados.
-
Baixe o DBI driver Cassandra https://metacpan.org/pod/DBD::Cassandra
e instale o driver em seu ambiente Perl. As etapas exatas dependem do ambiente. A seguir, um exemplo comum. cpanm DBD::Cassandra
-
Crie um arquivo para o aplicativo.
touch cqlapp.pl
-
Adicione o código de exemplo a seguir ao arquivo 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;Importante
Certifique-se de que
ServiceUserName
eServicePassword
corresponda ao nome de usuário e à senha que você obteve ao gerar as credenciais específicas do serviço seguindo as etapas para. Crie credenciais específicas do serviço para acesso programático ao Amazon Keyspacesnota
Para obter uma lista de endpoints disponíveis, consulte Endpoints de serviço para Amazon Keyspaces.
Execute o aplicativo.
perl cqlapp.pl