Perl: Manipulation de chaines

Les fonctions de manipulation de chaînes de caractères

On retrouve les mêmes qu'en C, et qui respectent la même syntaxe :

  Note: elle peut être utilisé comme lvalue (ie affecté).

  $chaine = "Hello";
  print substr($chaine, 2, 2);
  # -> "ll"
  substr($chaine, 2, 2) = "toto";
  # $chaine -> "Hetotoo"

  print index($chaine, "l");
  # -> 2

D'autres fonctions sont également définies :

  Donne la longueur de la chaîne passée en paramêtre.

  Il effectue la concaténation de deux chaînes.

  $var = $var . ".bak";

  Encrypte la chaîne passée en argument.

  $clair = <STDIN>;
  $crypte = (getpwuid($<))[1];
  $passwd = crypt($clair, $crypte);

  Opérations sur la casse de la chaîne. lc passe la chaîne en minuscules (lowercase). lcfirst passe la première lettre de la chaîne en minuscule. uc et ucfirst effectuent le passage en majuscules.

  print lc($chaine);
  # -> "hello"