Partie 2 - Etape 2 - Exercice 1
Localisation des motifs
localisation.pl
Voici un petit texte débile, qu'on pourra améliorer à son gout
On demande d'écrire les motifs, puis de tester, pour chercher :
1. l'un des mots "moi", "toi", partout dans le texte
2. les sous-chaines "moi" ou "toi".
3. le mot "moi" seulement en début de phrase
4. tester la différence entre recherche de mots et de sous-chaines
#!/usr/bin/perl -w
$texte="Il y a 2 mois, ce n'est pas toi qui a découvert cette vieille armoire, cachée sous la toiture\n.
Moi, je te dis que c'est bien moi, il y a 2 ou 3 mois ";
$motif=<>;
chomp($motif);
print "Recherche de $motif\n";
