view release on metacpan or  search on metacpan

t/03-document.t  view on Meta::CPAN

my $db = $arango->create_database("tmp_");

my $collection = $db->create_collection("collection");

$collection->create_document( { Hello => 'World' });

my $list = $collection->document_paths();

is ref($list) => "ARRAY" => "List of paths is an array";
like $list->[0] => qr!/_db/tmp_/_api/document/collection/\d+! => "path looks right";

$collection->create_document( q!{ "Hello" : "World" }! );
$list = $collection->document_paths();

is scalar(@$list), 2;

$arango->delete_database("tmp_");

done_testing;