Powered by Ajaxy
Digg StumbleUpon LinkedIn YouTube Flickr Facebook Twitter RSS Reset

Perl: Lancer un programme externe

#!/usr/local/bin/perl
 
# lancer la calculatrice de windows
exec "calc";
die "Impossible de lancer l

Accéder aux arguments des subroutine par leurs index

# Accéder aux arguments d'un subroutine via leurs numéros
# comme un tableau.
 
sub division
{
    #

Lire l’entrée clavier avec l’opérateur diamond””

#!/usr/local/bin/perl
 
while (defined($line = <>))
{
  chomp($line);
  print "Je dis $line!n";
}

Définir un nombre d’argumenet illimité pour un subroutine/Fonction

#!/usr/local/bin/perl
 
# trouver la valeur maximale d'une liste de valeur
sub find_max
 {
  my($peu

Si la fonction ‘keys’ d’un hash est utilisée dans un contexte scalaire elle retourne le nombre de clé du hash

#!/usr/local/bin/perl
 
 
my %hash = ("a" => 1, "b" => 2, "c" => 3);
 
# retourner le nombre de clé d'

Rechercher l’index d’un mot dans un string

#!/usr/local/bin/perl
 
use strict;
 
my $hi="Fan de perl, Bienvenu sur perl.mesexemples.com";
 
# Tro

Formater les données avec la fonction ‘sprintf’

#!/usr/local/bin/perl -w
#####################sprintf###############
# La fonction sprintf fonctionn

Calculer la somme d’un tableau à l’aide d’un subroutine

 
#!/usr/local/bin/perl -w
 
sub somme
{
 
    my ($num)= @_ ;        # Les paramètres de la fonction

Les fonctions ‘keys’ et ‘values’ retournent respectivement les clés et les valeurs d’un ‘Hash’

#!/usr/bin/perl
 
 
my %hash = ("a" => 1, "b" => 2, "c" => 3);
my @cles = keys %hash;

Boucle: Afficher les lettres de l’alphabet

#!/usr/local/bin/perl
 
use strict;
 
for my $lettre('a'..'z','A'..'Z')   #En minuscule et majuscule