Comment obtenir la longueur d'une chaîne de caractères en Perl ?

Question

Quel est l'équivalent en Perl de strlen() ?

Answer 1

length($string)

perldoc -f length

   length EXPR
   length  Returns the length in characters of the value of EXPR.  If EXPR is
           omitted, returns length of $\_.  Note that this cannot be used on an
           entire array or hash to find out how many elements these have.  For
           that, use "scalar @array" and "scalar keys %hash" respectively.

           Note the characters: if the EXPR is in Unicode, you will get the num-
           ber of characters, not the number of bytes.  To get the length in
           bytes, use "do { use bytes; length(EXPR) }", see bytes.

Answer 2

Bien que 'length()' soit la réponse correcte qui devrait être utilisée dans tout code sain, L'horreur de la longueur d'Abigail doit être mentionnée, ne serait-ce que pour l'histoire de Perl.

En gros, l'astuce consiste à utiliser la valeur de retour de l'opérateur de translittération fourre-tout :

print "foo" =~ y===c;   # prints 3

y///c remplace tous les caractères par eux-mêmes (grâce à l'option complémentaire 'c'), et renvoie le nombre de caractères remplacés (donc, en fait, la longueur de la chaîne).

Answer 3

length($string)

Answer 4

En length() fonction :

$string ='String Name';
$size=length($string);

Answer 5

Pas une réponse mais une observation : J'exécute la v5.30.2 construite pour darwin-2level, et j'ai remarqué que si je ne chomp l'entrée d'abord (comme avec stdin), puis calcule la longueur, les length d'un seul caractère n'est pas 1, mais 2.

N'oubliez pas les sauts de ligne et les autres caractères cachés qui peuvent jouer un rôle.

Et j'aimerais bien trouver le post d'Abigail, mais hélas il semble avoir été consumé par l'éther.