{filelink=14826}

#!/usr/bin/perl

###########  Sous-chaîne   #################
#  pour retourner une partie de la chaîne
#  Perl utilise le built-in substr()
#

$string = "Cours et tuto perl sur mesexemples.com";

$first  = substr($string, 0, 1);   # "C"
printf("Premier caractère à partir de l'index 0=%sn",$first);

$start  = substr($string, 6, 2);  # "et"
printf("deux caractères à partir de l'index 6=%sn",$start);

$rest   = substr($string, 13);    # perl sur mesexemples.com
printf("Tous les caractères à partir de l'index 13=%sn",$rest);

$last   = substr($string, -1);    # "m"
printf("dernier caractère=%sn",$last);

$end    = substr($string, -4);    # ".com"
printf("Les 4 derniers caractères=%sn",$end);

$piece  = substr($string, -15, 15); # "mesexemples.com"
printf("15 caractères à partir de l'index 15 dépuis la fin=%sn",$piece);

Livres sur ce sujet

[amazon_image id=”2841773698″ link=”true” target=”_blank” size=”medium” ]De l’art de programmer en Perl[/amazon_image][amazon_image id=”2914010729″ link=”true” target=”_blank” size=”medium” ]Perl pour l’impatient[/amazon_image][amazon_image id=”2841771407″ link=”true” target=”_blank” size=”medium” ]Programmation en Perl, 3ème édition[/amazon_image][amazon_image id=”B005ELPHNA” link=”true” target=”_blank” size=”medium” ]Perl moderne: L’essentiel des pratiques actuelles[/amazon_image][amazon_image id=”2914010656″ link=”true” target=”_blank” size=”medium” ]Les expressions régulières par l’exemple[/amazon_image][amazon_image id=”2914010869″ link=”true” target=”_blank” size=”medium” ]Les meilleures bibliothèques pour Perl[/amazon_image]