Via une url donnée, en extraire des informations
Bonjour :mrgreen:
J'ai une adresse web: http://www.openbsd.org/
Sur la page par défaut, il est indiqué "The current release is OpenBSD 4.9", je souhaiterai récupérer la valeur 49 afin de la stocker dans un fichier de log.
J'avance un peu, voici le code:
Code:
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18
| #!"C:\xampp\perl\bin\perl.exe"
use strict;
use warnings;
use CGI qw(:standard);
use CGI::Carp qw(warningsToBrowser fatalsToBrowser);
use LWP::Simple;
$CGI::POST_MAX=1024*100;
$CGI::DISABLE_UPLOADS=1;
my $cgi=new CGI;
my $release=get "http://www.openbsd.org/";
print $cgi->header(-charset=>'utf-8');
print "$release"; |
Maintenant, il faut que je trouve l'astuce afin d'isoler le nombre "49" :oops:
Merci d'avance de vos réponses.