* Perl * Perl * Perl * Perl * Perl *




Etape n°1




Exercice n°1

Copiez le texte du programme suivant dans un fichier (par copier-coller) 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".




* Perl * Perl * Perl * Perl * Perl *

Exercice n°2

Ecrire un programme qui crée trois variables $var1, $var2 et $var3 auxquelles vous affecterez les valeurs 33, 44 et 55 respectivement.
1. Affichez les valeurs de chaque variable en sortie.
2. 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.
3. Créez une variable $produit dans laquelle vous mettrez le produit des valeurs de chaque variable : même remarque que ci-dessus
4. 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.




* Perl * Perl * Perl * Perl * Perl *

Exercice n°3

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. Sauvegardez le poème ci-dessus dans un fichier poeme.txt. Ecrire un programme qui ouvre le fichier poeme.txt et qui écrit dans un deuxième fichier moteneau.txt les seules lignes qui contiennent la séquence de caractères "eau".
2. Vous réecrirez le programme pour numéroter toutes les lignes qui contiennent la même séquence.
3. Créez un nouveau programme pour produire dans un nouveau fichier contenant le premier mot de chaque vers.
4. Idem avec le dernier mot.




* Perl * Perl * Perl * Perl * Perl *

Exercice n°4

A partir du fichier poeme.txt, construire un programme qui produit en sortie le poème précédent dans lequel vous remplacerez la forme graphique "les" par "des".

Modifiez ce programme pour modifier les séquences "un", "deux"... par "1", "2"...




* Perl * Perl * Perl * Perl * Perl *

Etape n°2




Exercice n°1

A partir des différentes versions du corpus prématurés, construire un programme pour réaliser une extraction de la forme "contact".
L'examen de toutes les occurrences de la forme contact doit permettre de dégager son emploi dans le corpus.On commencera par examiner la forme "contact". Pour chaque forme étudiée, on notera les points suivants:

  • nombre de bébés concernés ;

  • nombre d'infirmières employant ce mot ;

  • emploi avec un verbe ou non ;

  • emploi singulier ou pluriel ;

  • contexte positif ou négatif ;

  • protagonistes du contact : précisés ou non .




* Perl * Perl * Perl * Perl * Perl *

Exercice n°2

Dans le corpus des bébés prématurés (prem96.bal), vous extrairez le champ texte (balise ) pour toutes les fiches concernant le bébé 2.




* Perl * Perl * Perl * Perl * Perl *

Exercice n°3

Construire un programme qui compte le nombre de mots contenus dans fichier.
Appliquez ce programme au poème de Baudelaire et au fichier p96.fic.




* Perl * Perl * Perl * Perl * Perl *

Etape n°3




Exercice n°1

Ce programme perl fournit sur la sortie standard l'ossature d'une page HTML : les balises de l'entête et celles du corps.

#!/usr/bin/perl
# ce programme se charge de créer la structure d'une page HTML
# qu'il écrit sur la sortie standard
$titre = "";
print "\n";
# on écrit l'entête print "$titre\n";
# on écrit le corps de la page
print "\n";
print "\n";
# on écrit la fin du fichier html print "\n;

Modifiez-le de façon à ce qu'il crée, dans le corps de la page, une liste numérotée. Les éléments de cette liste seront les lignes lues sur l'entrée standard (on lira toutes les lignes jusqu'a l'arrivée de fin de fichier sur l'entrée standard, et pour chaque ligne on créera un nouvel item de la liste en sortie). Le programme utilisera la première ligne aussi comme le titre de la page HTML. Appliquez le programme au fichier p96.fic.




* Perl * Perl * Perl * Perl * Perl *

Exercice supplémentaire

Créer un tableau, un dico de 10 mots avec comme clé le mot et sa catégorie.
Afficher le contenu du dico.




* Perl * Perl * Perl * Perl * Perl *