J'ai un script Perl qui utilise LWP::UserAgent pour télécharger une page Web qu'il traite ensuite en utilisant des expressions régulières. Le problème est que les parties de la page Web qui sont du HTML normal ne sont pas renvoyées à LWP :: UserAgent car le site reconnaît que le navigateur n'a pas installé Flash et renvoie à la place du HTML nous demandant de télécharger Flash au lieu du HTML approprié nous devons analyser. Comment puis-je faire en sorte que LWP :: UserAgent semble avoir installé Flash sur le serveur Web à partir duquel nous demandons la page? J'utilise le code suivant pour initialiser LWP :: UserAgent:Comment faire pour que LWP :: UserAgent semble avoir installé Flash?
use LWP::UserAgent;
my $ua = LWP::UserAgent->new(cookie_jar => { },requests_redirectable => [ ]);
$ua->agent('Mozilla/5.0 (X11; U; FreeBSD i386; en-US; rv:9.9.9.9) Gecko/20079999 Firefox/2.0.0.1');
$ua->timeout(10);
Merci d'avance pour votre aide!
"télécharger une page Web qu'il traite ensuite en utilisant des expressions régulières". Oh mec. – jrockway
Consultez cette page: http://stackoverflow.com/questions/2124560/how-can-i-make-lwpuseragent-look-like-another-browser/2124775#2124775 Où je réponds à cette question. En résumé, si la détection est effectuée dans l'en-tête Accept/User-Agent, c'est simple. Si la détection est faite avec flash, ou javascript, cela pourrait être plus difficile. Quoi qu'il en soit, vous devez savoir ce que vous envoyez au serveur et ce que vous obtenez. –