PERL

Practical ● Extraction and ● Report ● Language
●

PERL Séance 1
●

Les briques du langage
– – –

Données scalaires Les variables scalaires Les structures de contrôle
● ●

Alternative Boucles

Les données scalaires
●

Perl est un langage non typé Chaines de caractères (très proche du C) :
– –

●

print "Bonjour tout le monde" ; print "\nBonjour\nTu vas bien ?" ;
Mêmes séquences d'échappement que le C \n saut de ligne \t tabulation \r retour chariot

●

Les nombres (à virgule)
– –

print "\n3 x 4 =" ; print 3*4 ;

–

ou encore : print "\n3 x 4 =" , 3*4 ;

C.F. Donnees-scalaires

La virgule est un séparateur

Les variables
●

Elles débutent par $. Pas de type, pas de déclaration.
–

●

$prixHT = 12.65 ; # le prix hors taxe

La variable prixHT –

# : Marque de commentaire

print "\nLe prix hors taxe est $prixHT" ;

C.F. Variables

Interpolation automatique Plus intuitif que le C

Les calculs
●

Idem C pour +, -, *, /, %. Les divisions sont toujours à virgule. Puissance : pour 32, c'est 3**2.

●

●

$prixHT = 12.65 ;

$tauxTVA = 19.6 ;
$prixTTC = $prixHT * 1.196 ; print "\nLe prix TTC est $prixTTC" ;
●

Priorités des opérations, parenthèses etc... ++, --, +=, -= etc...

●

Saisir une donnée
●

On utilise l'entrée standard .

print "\nComment tu t'appelles ?\n"; $Prenom = ; # c'est la saisie

chomp ($Prenom); # suppression du saut de ligne print "\Hello $Prenom, nice to meet you";

C.F. Saisir-valeur

Principales fonctions de chaines : length et chop
●

length : la longueur d'une chaine print "\n\nlength donne la longueur d'une chaine"; print "\nLa chaine "$P1" contient " , length($P1) , " caractères";

●

chop : suppression du dernier caractère print "\n\nchop supprime le dernier caractère et le retourne";
$temp = $P1; # copie $dernier = chop($temp);

print "\nLe dernier caractère de "$P1" est $dernier"; print "\nLa chaine "$P1" tronquée est $temp";