Ich möchte auf einer Seite mit dem Namen XY posten und sie sollte direkt auf der Seite und nicht als Beitrag eines anderen Benutzers (des Administrators) erscheinen. Dies ist der Code, den ich angepasst habehttp://qscripts.blogspot.de/2011/02/post-to-your-own-facebook-account-from.html aber dies postet im Bereich für andere Benutzer nicht auf der Hauptseite. Wenn ich die Seiten-ID durch "mich" ersetze, wird dies auf der Seite des Administrators und korrekt im Hauptbereich veröffentlicht.

#!/usr/bin/perl -I/opt/ActivePerl-5.16/site/lib/

# http://qscripts.blogspot.de/2011/02/post-to-your-own-facebook-account-from.html

use strict;
use warnings;
use open qw(:std :utf8);
use LWP::Simple;
use YAML;
use JSON;
use URI;
use utf8;

my $access_token = 'top secret';

graph_api('1484559088426611/feed', {
  access_token => $access_token,
  message      => 'Hello World! I’m posting Facebook updates from a script!',
  description  => 'You want to create a script to read messages and post status updates to your own '
                . 'Facebook account, but you find the official documentation confusing and '
                . 'you aren’t sure where to start. Search no more because here you’ll find '
                . 'the easiest way to do just this.',
  method       => 'post'
});


exit 0;

sub graph_api {
  my $uri = new URI('https://graph.facebook.com/' . shift);
  $uri->query_form(shift);
  my $resp = get("$uri");
  return defined $resp ? decode_json($resp) : undef;
}