Use strict; use lwp::useragent; # crée un agent et une requête my $ua = lwp::useragent->new(); my $req = http::request->new( get => 'http://monurl.com'); # récupère la réponse if(defined($req )){ my $res = $ua->request($req); #si le retour est non null et en état success on traite if(defined($res) && $res->is_success()){ print "\n success : c

Open(img,"fichieralire") || die ("erreur d'ouverture du fichier de fichieralire") ; while (<img>) { $_ =~ s/\n//g; print "\n ligne : ".$_; } rien de bien compliqué, on ouvre le fichier, on le parcourt, une petite expression régulière pour enlever tout les retours à la ligne qui pourraient géner lors du traitement des lignes

Try { process child = runtime.getruntime().exec(commande); /* récuperation du stream de retour */ inputstream in = child.getinputstream(); string resfile=""; /* stringwriter et buffer pour récupere le retour systeme */ writer = new stringwriter(); buffer = new char[1024]; try { /* on lit le retour du systeme */ reader = new bufferedreader(new inp

<c:out value= "${test}" escapexml= "false" /> cette petite ligne permet d'insérer du xml sans que les caractéres < et > soit interprétés et remplacé par des &gt; ou &lt;.