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

Structure de contrôle: Exemple d’un bloc nu

#!/usr/bin/perl -w
 
# Le bloc nu exécute une seule fois son contenu
# et limite la portabilités de s

Calculer la fréquence de chaque valeur dans le Hash

#!/usr/bin/perl -w
my %mes_villes = ("Allemagne" => "Berlin",
    			  "France" => 'Paris',

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

Calculer la différence en nombre de jour entre deux dates

use Date::Calc qw(Delta_Days);
 
@date1 = (2011, 1, 30);        # 30 janvier 2011
@date2  = (1985, 3

Calculer la valeur absolue

#!/usr/local/bin/perl
 
$s = -1;
 
print "La Valeur absolue de $s = ", abs $s;

Perl: Exemple de calcul factoriel

    my @factoriel = (1);
    $MAX_FACT=9;
    for my $n (1..$MAX_FACT) {
        $factoriel[$n] = $

Comment accéder et traiter les arguments d’un subroutine

#!/usr/bin/perl
############# Subroutine #############
# le mot subroutine en anglais sous-programme

Calcul des puisssances avec l’opérateur ‘**’

###########  Puissance   #################
# Pour calculer la puissance on utilise
# l'opérateur '**

Exécuter une formule sur Excel et afficher le résultat sur le console

#!/usr/bin/perl -w
 
use Win32::OLE;
 
$operand1 = '10';
$operand2 = '20';
 
$xls_app = Win32::OLE->new