Perl Facebook:：以页面而不是管理员的身份向Facebook页面发送图形

使用Perl模块Facebook:：Graph，我创建了一些基本的Perl代码，可以发布到我自己的墙上。我可以在自己的墙上分享一张照片。我也可以发布一个简单的留言到其中一个我是管理员的页面。但是，当我尝试将照片发布到页面时，它会以我的身份发布，而不是页面

以下是以我的身份发布到Facebook页面的示例代码。我需要它作为页面发布，而不是作为我

# previously, I obtained my Page's accesstoken, and other credentials
# including the Facebook Page ID

my $fb = Facebook::Graph->new(
    app_id  =>      $facebook_application_id,
    secret  =>      $facebook_application_secret
);

$fb->access_token($facebook_accesstoken);

my $rstring = $fb
    ->add_photo
    ->to($facebookPageID)
    ->set_message('Look at this really cool photo!')
    ->set_source('./raw_image_example.jpg')
    ->publish
    ->as_string;

print "$rstring\n\n";

我正试图找出如何在Facebook页面的墙上创建一个帖子，就好像它是由该页面而不是我发布的一样

我正试图通过CPAN模块Facebook:：Graph实现这一点，该模块位于：

我这辈子都搞不清楚。欢迎任何帮助

启用“管理页面”权限以获取代码

提交代码以获取您的帐户（您是管理员或内容提供者）的用户访问令牌，以便查询所有内容

通过调用/me/accounts查询您的帐户，您将获得页面访问令牌。一个帐户可以管理多个页面。因此，请使用JSON选择您想要的

使用这些页面访问令牌正常发布消息或照片。 （请注意，它不是/feed），因为页面访问令牌已经包含ID

---

我也经历过同样的麻烦，所以让我一步一步地分享我所做的，这样可能会让其他人受益：

在访问developers.facebook.com创建应用程序后，您 去

在上面名为“Graph API Explorer”的菜单上，您可以选择应用程序 你刚刚创造了

然后，在右边，有另一个菜单名为“Get” 令牌”，在其中选择“获取访问令牌”，然后出现一个弹出窗口 将出现，您可以将其扩展到 “权限”选项卡，并选中“发布页面”和“管理页面” 选项，然后单击“获取访问令牌”。它会弹出一个窗口 要求您确认是否要授予此应用的访问权限。会的 拿出一个长的代币

然后，再次选择菜单Get Token，您将在 从菜单中选择您管理的页面列表，然后选择所需的页面 它将显示其相关的访问令牌

现在收到的代币只是暂时的，比如2小时左右。 你想要的东西可以持续60天并且可以续展，所以从你的 执行curl请求的服务器： $facebook\u应用程序\u id和客户端\u机密=$facebook\u应用程序\u机密和fb\u交换\u令牌=$facebook\u访问令牌

Facebook将输出如下内容：

access_token=abcdefghijklmnopqrstuvxyzabcdefghijklmnopqrstuvxyzabefghijklmnopqrstuvxyzabcdefghijklmnopqrstuvxyz&expires=5184971

然后，您可以使用精细的代码发布为您的页面

我希望这有帮助