DESS TIMH

Introduction au langage Perl

6. Fonctions prédéfinies
   
   Quelques fonctions offertes par Perl pour manipuler les données. L'inventaire n'est pas exhaustif.

1. Système

• print : permet d'afficher un message, ou le contenu de variables.
  print 'bonjour';
  print 'J\'ai acheté ', $nombre,' kilos de ', $fruit;
  print;=> affiche le contenu de la variable spéciale $_
  ou encore :
  print "J'ai acheté $nombre kilos de ", &pluriel($fruit);

• exit : permet d'arrêter le programme en cours
  if ($erreur) {exit;}
• die : permet d'arrêter le programme en cours en affichant un message d'erreur.
  if ($fruit eq 'orange') {die 'Je déteste les oranges !'}
• system : permet de lancer une commande système
  system 'mkdir mon_repertoire';
• sleepn : le programme « dort » pendant nsecondes
  ex: programme « bip horaire »
  while (1) {sleep 3600; print "\b";}
  le fait d'écrire « while (1) » permet de faire une boucle infinie (on aurait pu écrire :
  « for (;;) »)

2. Mathématique
   
   Les fonctions mathématiques habituelles existent aussi en Perl :
   sin, cos, tan, int(partie entière d'un nombre), sqrt, rand(nombre aléatoire entre 0 et n),
   exp (exponentielle de n), log, abs(valeur absolue).
   $s = cos(0); => 1
   $s = log(exp(1)); => 1
   $i = int(sqrt(8));=> 2
   $tirage_loto = int(rand(42)) + 1;
   $i = abs(-5.6)=> 5.6

http://www.med.univ-rennes1.fr/~poulique/cours/perl/

Page 13