Exercice 1 :
 
Copiez le texte du programme suivant dans un fichier et exécutez le :
 
#!/usr/local/bin/perl
# ce programme affiche "Bonjour tout le monde"
print "bonjour tout le monde\n";
 
-         
 
Modifier ce programme et ajouter l'affichage du message : "Mon premier programme écrit avec PERL".
 
# ce programme affiche "Bonjour tout le monde"
print "bonjour tout le monde\n";
print « Mon premier programme écrit avec PERL\n » ;
 
 
Exercice 2 :
 
Ecrire un programme qui crée trois variables $var1, $var2 et $var3 auxquelles vous affecterez les valeurs 33, 44 et 55 respectivement.
 
· affichez les valeurs de chaque variable en sortie.
· créez une variable $somme dans laquelle vous mettrez la somme des valeurs de chaque variable : $var1 + $ var2, $var1 + $var3... Affichez la valeur de $somme et des variables utilisées pour produire cette somme.
· créez une variable $produit dans laquelle vous mettrez le produit des valeurs de chaque variable : même remarque que ci-dessus
Permutez les valeurs de $var1, $var2 et $var3. C'est à dire que $var1 vaudra ce que valait $var2, $var2 ce que valait $var3, et $var3 ce que valait $var1. Pour cela vous créerez une variable temporaire $tmp..
 
-          Voici le script utilisé :
-         
 
-          Voici ce que l’ont obtient dans le terminal :
 
-         
 


 
Exercice 3 :
 
a. parcours d'une liste
 
1) Récupérer le programme suivant,
 
 
2) essayer de l'exécuter…
 
«  Can't locate object method "vendredi" via package "samedi" (perhaps you forgot to load "samedi"?) at p1_ex3.pl line 1. » Un tel message d’erreur de PERL, doit à voir tout premièrement avec l’absence de virgules dans la liste…
 
3) si nécessaire corriger et compléter :
 
 
Script ici : p1_ex3_2.pl
 
Voyons ce que cela donne à présent :
 
 
-
 
b. manipulations de listes
 
Récupérer le programme suivant.
 
Commenter les différentes instructions…
-          script ici : p1_ex3b.pl
-         
 
 et prévoir très précisément les affichages avant d'expérimenter :
P.S : J’en ai peut être fait un peu trop !


 
 
Exercice 4 :
 
La mort des amants
 
Nous aurons des lits pleins d'odeurs légères,
Des divans profonds comme des tombeaux,
Et d'étranges fleurs sur des étagères,
Ecloses pour nous sous des cieux plus beaux.
Usant à l'envi leurs chaleurs dernières,
Nos deux coeurs seront deux vastes flambeaux,
Qui réfléchiront leurs doubles lumières
Dans nos deux esprits, ces miroirs jumeaux.
Un soir fait de rose et de bleu mystique,
Nous échangerons un éclair unique,
Comme un long sanglot, tout chargé d'adieux;
Et plus tard un Ange, entr'ouvrant les portes,
Viendra ranimer,
fidèle et joyeux,
Les miroirs ternis et les flammes mortes.
 
Charles Baudelaire
 
1 et 2.  Le texte du poème ci-dessus est contenu dans le fichier amants.txt du dossier CORPUS. Ecrire un programme qui ouvre le fichier amants.txt et qui écrit dans un deuxième fichier moteneau.txt les seules lignes qui contiennent la séquence de caractères "eau".
Vous améliorerez le programme pour numéroter toutes les lignes qui contiennent la même séquence :
Voici le script : P1_ex4_1.pl
-
Voilà le fichier résultat :
moteau.txt
 
 
3. Créez un nouveau programme pour produire dans un nouveau fichier contenant le premier mot de chaque vers.
- Voici le script : p1_ex4_3.pl
-
Voilà le fichier résultat : prems.txt
 
 
4. Idem avec le dernier mot.
Le script : p1_ex4_4.pl
Le résultat : der.txt
 
 
Exercice 5 :
1. A partir du fichier amants.txt , construire un programme qui produit en sortie le poème précédent dans lequel vous remplacerez la forme graphique "les" par "des".
- Voici le script : -P1_ex5_1.pl
-
Voilà le fichier résultat : les-des.txt
 
 
2. Modifiez ce programme pour modifier les séquences "un", "deux"... par "1", "2"...
Script : P1_ex5_2.pl
-         
Résultat : un-deux.txt