En estos dos días me di cuenta de que la función de comentarios del sitio tenía un problema. Los usuarios de Facebook no pueden iniciar sesión ni dejar comentarios, lo cual es bastante increíble.

Así que utilicé el método de depuración más básico, rastreando los logs paso a paso, y descubrí que la respuesta del access_token había cambiado.

El manejo hasta ahora era así:

    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/&.*//;

Pero recientemente cambió a formato JSON, así que comenté todo lo anterior,

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

y al cambiarlo a esto, se solucionó.

¡¡Bienvenidos a probarlo