Bonjours ,j'ai cherché sur internet des tutos sur les expressions réguliere j'ai trouvé mais rien de très précis. Je faisais un code qui allait sur une page web (avec LWP::Simple) ensuite je voulais chercher dans la source de la page un mot exacte. Je vous montre mon code :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
#!usr/bin/perl
use LWP::Simple;
print"\n[+]Cherche la chaine...\n";sleep(1);
my $url="http://monsite.com/page.php";
my $result=get($url) or die"[+]Une erreur est survenue...";
 if ($result=~ /Im_g100.gif\b/)
 {
 my $code="0896378";
 }
if ($result=~ /Im_g120.gif\b/)
 {
 my $code="1113879";
 }
if ($result=~ /Im_g25.gif\b/)
 {
 my $code="4693478";
 }
if ($result=~ /Im_g40.gif\b/)
 {
 my $code="4963578";
 }
if ($result=~ /Im_g45.gif\b/)
 {
 my $code="7924819";
 } 
 if ($result=~ /Im_g75.gif\b/)
 {
 my $code="9965782";
 }
 print"$code";
Mais je n'ai aucun résultat je ne vois vraiment pas comment y arriver :s.