Beefy Boxes and Bandwidth Generously Provided by pair Networks
Syntactic Confectionery Delight
 
PerlMonks  

Post on FB (cron)

by ultranerds (Pilgrim)
on Mar 13, 2014 at 15:28 UTC ( #1078188=perlquestion: print w/ replies, xml ) Need Help??
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;
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

Comment on Post on FB (cron)
Download Code
Reaped: Re: Post on FB (cron)
by NodeReaper (Curate) on Mar 13, 2014 at 15:57 UTC
      Sorry? Spam? You suggesting this is spam? How does this even look like spam!
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.

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

      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.
      Then your code would be:
      my $groupid = 12345; $fb->add_post ->id($groupid) ->set_message('I like beer.') ->publish;
        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.
        BTW, this kinda works:
        $fb->access_token( $access_token ); $fb->add_post() ->to(490559244324622) ->set_message('I like beer.') ->publish;
        However, it seems to post on my wall, as my personal account (not the admin of the wall).

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: perlquestion [id://1078188]
Front-paged by Arunbear
help
Chatterbox?
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others drinking their drinks and smoking their pipes about the Monastery: (10)
As of 2014-07-28 19:23 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    My favorite superfluous repetitious redundant duplicative phrase is:









    Results (207 votes), past polls