Perl codes and news

# Un palindrome  est un texte dont la succession des lettres
# est la même quand on la parcourt de 

#!/usr/bin/perl -w


$text = 'aa' | 'bb';
print "$textn";     # 'cc'

$text = 'cc' & 'gg';
print "$

#!/usr/bin/perl

use warnings;
use strict;
use Net::FTP;

my $ftp = Net::FTP->new("ftp.monserveurFTP

#!usr/bin/perl 

$fichier="c:/test";

 # Ouvrir un encodé en utf
open(FH, "< :encoding(UTF-8)", $fic

 ###########  pack et unpack   #################
 # pack(): reçoit une chaîne de Caractères
 #      

do {
    print "Veuillez Taper votre Pattern? ";
    chomp($pat = <>);
    eval { "" =~ /$pat/ };
 

#!/usr/bin/perl

$nombre_simple=3.5;
$nombre_str="6";

#L'opération arithmétique convertit $nombre_s

#! /usr/local/bin/perl

use File::Copy;

$rep="c:/data.txt";
#Copier et coller le répertoire dans un

#!/usr/local/bin/perl

use strict;

my $y = 1.15470053837925;
my $x = 2.0;

my $conversion = 180 / 3

  #!/usr/bin/perl -w

use String::Approx qw(amatch);

open(FH, "c:/test.txt")                 # Ouvr