ultranerds has asked for the wisdom of the Perl Monks concerning the following question:

I'm going up the wall trying top get this going!

I'm trying to write a script, which will run via cron - and make posts to my GROUP (not wall, and actual group I manage)

So far I've got: 
        use Facebook::Graph;
        use LWP::Simple;

        my $access_token = 'xxx';

        my $fb = Facebook::Graph->new(
         app_id          => 378913472248618,
         secret          => 'xxxx',
         postback => "https://www.facebook.com/connect/login_success.h
+tml"
        );

        $fb->access_token( $access_token ); 
        $fb->add_post
           ->set_message('I like beer.')
           ->publish;

[download]
That works - and posts to MY wall... but how the heck do I get it to post on a group? I've been going round and round in circles with this for the last 2 hours.. and its doing my head in :/

TIA

Andy

Replies are listed 'Best First'.
Re: Post on FB (cron)
by Anonymous Monk on Mar 13, 2014 at 16:13 UTC 
    id
An profile id like sarahbownds or an object id like 16665510298 for th
+e Perl page.

add_post ( [ id ] )
Creates a Facebook::Graph::Publish::Post object, which can be used to 
+publish data to a user's feed/wall.

    [download]

    Sounds like you just need to pass the ID of the place you want to post to, into your add_post function

[reply]
[d/l]
      The first listed method on the Facebook::Graph::Publish::Post should give this functionality. 
      to ( id )
Specify a profile id to post to. Defaults to 'me', 
which is the currently logged in user.

      [download]
      Then your code would be: 
      my $groupid = 12345;
$fb->add_post
    ->id($groupid)
    ->set_message('I like beer.')
    ->publish;

      [download]
[reply]
[d/l]
[select]
        BTW, this kinda works: 
                $fb->access_token( $access_token ); 
        $fb->add_post()
           ->to(490559244324622)
           ->set_message('I like beer.')
           ->publish;

        [download]
        However, it seems to post on my wall, as my personal account (not the admin of the wall).
[reply]
[d/l]
        Thanks for the reply. Thats what I assumed before, but to no avail - it just gives an error:

        Can't locate object method "id" via package "Facebook::Graph::Publish::Post" at test.cgi line 53.
[reply]
[d/l]

Back to Seekers of Perl Wisdom