« Programmation Perl/Chaînes de caractères » : différence entre les versions

Contenu supprimé Contenu ajouté
Ligne 150 :
 
;''chop'' : Supprime le dernier caractère d'une chaîne.
Il est utilisé surtout pour effacer les \n ("entrées" ou Carriage Return).
 
<source lang="perl">
#!/usr/bin/perl -w
use strict;
 
# chop efface le dernier caractère de chaque item d'un liste
my @tableau = ( "a\n" , "b\n", "c\n" );
print @tableau; # a b c sur 3 lignes distinctes
 
chop @tableau;
print @tableau; # abc accolés : les \n ont disparu
 
print "\n";
 
# chop renvoie son dernier effacement
my @tableau2 = ( "vaches" , "veaux" );
 
print chop @tableau2;# le x de "veaux"
print "\n";
 
print @tableau2;# vacheveau
print "\n";
</source>
;''chomp'' : Permet de supprimer plusieurs caractères à la fin d'un chaîne.
;''reverse'' : Inverse l'ordre des caractères d'une chaîne.