Les Chaines de Caractères en Perl

1. Qu'est-ce qu'une Chaine de Caractères ?

Une chaine de caractère est une variable contenant une suite de caractère, et donc un mot ou une phrase. C'est donc simplement une variable alpha-numérique, elle peut donc ne contenir que des chiffres. Le Perl ne fait pas de différence de type entre les entiers, décimaux et Chaine de caractère d'un point de vue déclaration. C'est la façon dont on se sert d'une variable qui lui impose son type.

2. Fonctions utiles

Fonction	Description
	Exemple
substr	Fonction renvoyant une sous-chaine de celle passée en paramètre
	$jour = substr($date,0,2); # renvoit les 2 premiers caractères
chomp	Efface le dernier caractère d'une chaine. Utile dans le cas de la lecture de fichier ou le dernier caractère est un saut de ligne
	chomp($maLigne);
index	Renvoit la position d'une sous-chaine dans une chaine
	$i = index ($URL, "hobbesworld.com")
length	Renvoit la taille de la chaine
	$i = length ($URL)
uc	Passe toute la chaine en majuscule (uppercase)
	$machaine_en_majuscule = uc($machaine);
lc	Passe toute la chaine en minuscule (lowercase)
	$machaine_en_minuscule = lc($machaine);

3. Opérateurs

Opérateur	Description
	Exemple
eq	Teste l'égalité de 2 chaines
	if ($Chaine1 eq $Chaine2) { print "les chaines sont identiques"; }

4. Astuces

4. 1. Quelques codes utiles

4.1.1. Changer les Guillemets en double-Guillemets

Cette opération peut s'avérer indispensable dans le cas d'utilisation d'une base de donnée, entre autre. Il s'agit en fait de remplacer le '"' par '""'.

$maVariable =~ s/"/$& x 2/eg;

4.1.2. Enlever les espaces superflux en fin de ligne

Cette commande permet de supprimer tous les espaces se trouvant en fin de chaine de caractère

$maVariable =~ s/\s+$//;

4.1.3. Mettre un code Perl avec noms de variables Perl directement interprétées

open (RETOURHTML, $FichHTML);

while ($line=<RETOURHTML>) {

  $line =~ s/(\$\w+)/$1/eeg; 

  print "$line\n";

} 

close (RETOURHTML);

Page modifiée le : 02/10/2024