$texte=”Bienvenu sur www.mesexemples.com”;
print(“Avant l’inversion la phrase:n”,$texte,”n”);
#
$texte=”Bienvenu sur www.mesexemples.com”;
print(“Avant l’inversion la phrase:n”,$texte,”n”);
#
#!/bin/perl -tw
my $remote_host=”127.0.0.1″; # L’adresse du serveur
my $remote_port=80;
################ Utilisation de ‘open’ et ‘sysopen’ ############################
# Pendant l’overt
#!/usr/bin/perl
for $x (0..9)
{
# génération des nombres aléatoires entre 1 et 9
$random = int( ran
#!/usr/local/bin/perl
#Conversion minuscule en majuscule
print uc(“bienvenu sur perl.mesexemples.
################ Copie des fichiers binairs ############################
# Copier et coller un fic
use Net::FTP;
$username = “test_username”; # Nom d’utilisateur
$password = “test_m
#!/usr/local/bin/perl
my %mes_villes = (“Allemagne” => “Berlin”,
“Angleterre” => “L
#!/usr/local/bin/perl
my %mes_villes = (“Allemagne” => “Berlin”,
“Angleterre” => “L
#!/usr/local/bin/perl
use strict;
for my $lettre(‘a’..’z’,’A’..’Z’) #En minuscule et majuscule