File "affiche.pl"

Full Path: /home/analogde/www/XTRAIL/andre/PERL/affiche.pl
File size: 145 bytes
MIME-type: text/x-perl
Charset: utf-8

 
Open Edit   Advanced Editor   Back 
#!/usr/bin/perl

open FICHIER,"< lettre.txt" or die "Le fichier n'existe pas !";
while ($ligne = <FICHIER>){
      print $ligne;
}
close FICHIER;