Perl — chomp
Aller à la navigation
Aller à la recherche
| Type | Fonction Perl |
|---|---|
| Rôle | Retirer le retour chariot final d'une variable |
En Perl, la fonction chomp retire le retour chariot (saut de
ligne) terminant une variable, typiquement après une saisie au clavier.
Usage
chomp $var;
Saisie via un prompt
L'opérateur <> marque une pause et récupère la valeur saisie.
use strict;
use warnings;
print "Comment vous appelez-vous ? ";
my $nom = <>; # Récupération du nom de l'utilisateur
chomp $nom; # Retrait du saut de ligne
print "Bonjour, $nom !\n";
#!/usr/bin/perl
use strict;
use warnings;
print "Entrer une phrase :" ;
my $phrase = <>;
print "Entrer un nom :";
my $nbre = <>;
chomp $nbre;
print '-' x 30 . "\n";
print $phrase x $nbre;