Creating implementation for idiom 169 : String length

Idiom

# 169 String length

Created by

Lead paragraph

Assign to integer _n the number of characters of string _s.
Make sure that multibyte characters are properly handled.
_n can be different from the number of bytes of _s.

New implementation

Language

Imports

Code

Documentation URL

Original attribution URL

Online runnable demo

Username

Be concise.

Be useful.

All contributions dictatorially edited by webmasters to match personal tastes.

Please do not paste any copyright violating resource.

Please try to avoid dependencies to third-party libraries and frameworks.

Other implementations

n : Integer := s'Length;

(def n (.codePointCount s 0 (count s)))

IDENTIFICATION DIVISION.
PROGRAM-ID. length.
PROCEDURE DIVISION.
   MOVE FUNCTION LENGTH(s) TO n
STOP RUN.

auto utf8len(std::string_view const& s) -> size_t
{
	std::setlocale(LC_ALL, "en_US.utf8");

	auto n = size_t{};
	auto size = size_t{};
	auto mb = std::mbstate_t{};

	while(size < s.length())
	{
		size += mbrlen(s.data() + size, s.length() - size, &mb);
		n += 1;
	}

	return n;
}

Demo

int n = s.Length;

Demo
Doc

std.range;

size_t n = s.walkLength;

import std.uni, std.range;

size_t n = s.byGrapheme.walkLength;

size_t n = s.length;

int n = s.length;

n = String.length s

Demo
Doc

N = string:length(S)

n = len(s)

import "unicode/utf8"

n := utf8.RuneCountInString(s)

Demo
Doc

n = length s

const n = s.length;

int n = s.length();

val n = s.length

(length s)

(setf n (length s))

local n = utf8.len(s)

@import Foundation;

NSUInteger n=s.length;

$n = mb_strlen($s, 'UTF-8');

Demo
Doc

uses sysutils;

n := s.length;

uses LazUtf8;

n := length(s);

uses LazUtf8;

n := Utf8Length(s);

my $n = length( $s );

Demo
Doc

n = len(s)

n = s.size

n = s.length

let n = s.chars().count();

Demo
Doc

val n = s.length()

Dim n As Integer = s.Length

Preview