if ($access) {
    my $sql = "SELECT `key` FROM `users`";
    my $keys = &retrieveData($sql,1);
    foreach my $get (@{$keys}) {
        say $get->{key};
        my $get_stmt = $cass->prepare( 'SELECT "accessedDt" FROM accounts WHERE key = '.$hex->as_hex)->get;
        my ( undef, $result ) = $get_stmt->execute( [] )->get;
        foreach my $row ($result->rows_hash) {
            my $key_find = ($row->{"accessedDt"});
            if (defined $key_find) {
                say "I found this date --- $key_find";
            }
        }
    }
}

sub retrieveData {
    my $value;
    my $sth = $dbh->prepare($_[0]);
    $sth->execute();
    if ($_[1]) { $value = $sth->fetchall_arrayref({}); }
    else { $value = $sth->fetchrow_array(); }
    return $value;
}