Logo

Programming-Idioms

This language bar is your friend. Select your favorite languages!
  • Perl

Idiom #321 Access character in string, by index

Assign to c the value of the i-th character of the string s.

Make sure to properly handle multi-byte characters. i is the character index, which may not be equal to the byte index.

use utf8;
$c = substr $s, $i, 1;

For perl to recognize characters rather than bytes in operations like substr or pattern matching, the utf8 pragma must be in effect. Otherwise it will only index properly on ASCII (U+000 to U+007F).
 c = s(i:i)

Multibyte characters are handled with a different KIND in Fortran characters.
New implementation...
< > ⌨
programming-idioms.org 
use utf8;
$c = substr $s, $i, 1;
 c = s(i:i)
c := []rune(s)[i]
char c = s.charAt(i);
c := Utf8Copy(s,i,1);
c := s[i];
c = s[i]
c = s[i]
let c = s.chars().nth(i).expect("s is too short");