|
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.
|
