Perl a deux fonctions pour vous aider à capitaliser caractères dans une chaîne . La fonction " ucfirst " capitalise seulement le premier caractère d' une chaîne tandis que la fonction " uc " capitalise tous les personnages. Cette fonction est utile lorsque vous voulez comparer deux chaînes ou plus sans se soucier des cas . Transformer une chaîne en cas de titre est beaucoup plus difficile que Perl n'a pas de fonction de chaîne facilement disponibles pour le faire . Cependant, vous pouvez utiliser l'opérateur "s" pour trouver les premiers caractères de chaque mot dans une chaîne, puis capitaliser . Instructions
1

Ouvrez le fichier programme Perl. Placez le curseur où vous voulez profiter d'une chaîne. Tapez le code suivant :

$ string = " . Content de ma chaîne" ;

$ string = ucfirst ( $ string) ;
impression

$ string ;
< p> Cela crée une variable de chaîne qui se compose de lettres entièrement minuscules. Elle appelle ensuite la fonction ucfirst de capitaliser le premier caractère de la chaîne . Le résultat de l'instruction d'impression est " le contenu de mon string . "
2

Tapez le code suivant :

$ string = "content de ma chaîne. " ;

$ string = uc ( $ string) ;
impression

$ string ;

réinitialise la variable chaîne. Ensuite , la chaîne appelle la fonction uc pour capitaliser tous les caractères de la chaîne. Le résultat de l'instruction d'impression est " contenu de mon STRING. "
3

Tapez le code suivant :

$ string = "content de ma chaîne. " ;

$ string = ~ s /( [ \\ w '] +) /\\ u \\ l $ 1 /g;
impression

$ string ;

peu compliqué de code utilise la " s opérateur ///" , ce qui remplace les occurrences fournies par la première expression avec le second . Dans ce cas , il court le long du train de trouver le premier caractère de chaque mot . Normalement, le caractère après l'apostrophe serait considéré comme un mot nouveau , mais la première expression indique à l'opérateur d'ignorer apostrophes . Une fois qu'il trouve ces caractères spécifiques , il les tire . Le résultat de l'instruction d'impression est " le contenu de mon String. "
4

Enregistrez le fichier de programme Perl et exécutez-le dans votre version de Perl.