La fonction follow_link

Bonjour,


Cela concerne la fonction follow_link: J'essaye d'utiliser une deuxième fois la fonction sur une page que j'avais déjà "follow" avec cette même fonction donc. J'ai utilisé d'abord la méthode avec get mais ça a pas marché donc j'ai tenté celle proposée par le site metacpan (voir pièce jointe) mais l'invite répond "link not found at projet.pl line 22" et pourtant, le lien est bien présent dans le code source de la page.

Quelqu'un pourrait m'aider? Merci d'avance.

use LWP::Simple;
use PerlIO::locale;
use HTML::TreeBuilder;
use WWW::Mechanize;
binmode STDOUT, ':locale';
use strict;
use warnings;
 
print "Entrez le nom du premier acteur: ";
my $acteur1 = <STDIN>;
print "Entrez le nom du premier acteur: ";
my $acteur2 = <STDIN>;
print "Nous allons comparer la filmographie de $acteur1 et $acteur2";
 
my $lien1 = "https://www.imdb.com/find?s=nm&q=$acteur1";
my $mech = WWW::Mechanize->new();
$mech->get($lien1);
$mech->follow_link( url_regex => qr/nm0/i );
$mech->follow_link( url_regex => qr/act_/i );
print $mech->content;