Logo

Programming-Idioms

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

Idiom #46 Extract beginning of string (prefix)

Create the string t consisting of the 5 first characters of the string s.
Make sure that multibyte characters are properly handled.

my $t = substr($s,0,5);
T : String := S (1 .. 5);

New implementation...