Je viens de découvrir ces deux derniers jours que la fonction de commentaires du site rencontrait des problèmes, les utilisateurs de Facebook ne pouvaient ni se connecter ni laisser de message, c’est assez incroyable.

J’ai donc utilisé la méthode de debug la plus basique, en traquant les logs petit à petit, et j’ai découvert que la réponse du access token avait changé.

Jusqu’à présent, le traitement se faisait ainsi,

    my $content = $response->decoded_content();
    return $app->errtrans("Invalid request.")
        unless $content =~ m/^access_token=(.*)/m;
        
    my $access_token = $1;
    $access_token =~ s/\s//g;
    $access_token =~ s/&.*//;

mais récemment, c’est passé au format JSON, alors j’ai mis tout ce qui précède en commentaire,

require JSON;
my $access_token = JSON::from_json($content)->{access_token};

et en le changeant comme ça, tout est rentré dans l’ordre.

Je vous invite à venir tester !