2011.07.24
Perlを使ってFacebookの自分のウォールに写真付きで投稿する方法
やっと成功した。個人的メモ。
基本は以前に紹介したTwitterの場合のOath認証と同じですが、専用のAPIも必要なく、もっと簡単に扱えます。Open Graph Protocolって思想ってか？
(1)開発者ページにアクセス。アプリを登録する。サイトURL、ドメインは下記の認証作業で使用する必要があるため、2つとも同じにして自分でPerlスクリプトをおける場所にする(下記で使うredirect_uriとドメインが違うとエラーになる。)。
(2)登録すると、AppIDと AppSecretが発行されるのでメモ
(3)アプリを使ってaccess_tokenを取得するためのスクリプトを作成、設置。https://usewill.com/facebook.cgiでやりとりするとして話を進める。以下の2回のFacebook graph APIのアクセスで投稿に必要なユーザーごとのaccess_tokenが取得出来る。
＜＜概要＞＞
step.1:AppIDと取得したいアクセス権限のリストを添えてFacebook graph APIに送る(アクセス1回目)
step.2:Facebook graph APIは申請を行ったユーザーに(パソコンに保存されているcookie内容を元に)アプリからのアクセスを許可するかユーザーに聞く
step.3:許可された場合、Facebookのgraph APIがredirect_uriに認証コードを返してくる。
step.4:AppID、AppSecret、取得した認証コードを添えてユーザーごとのaccess_tokenを要求(アクセス2回目)
step.5:承認されればFacebook graph APIからユーザーごとのaccess_tokenが帰ってくる。
＜＜具体例＞＞
★step.1の部分
https://graph.facebook.com/oauth/authorize?client_id= AppID&redirect_uri= https://usewill.com/facebook.cgi(URLエンコードしておく)&scope=publish_stream,offline_access
上記の例ではscopeはウォールへの書き込みに必要な「publish_stream」と、ログオンしてなくてもアクセス可能にするための「offline_access」を要求している。この2つでウォールへの書き込み可能。
★step.4の部分
作成したfacebook.cgiではFacebook graph APIがstep3でGETで渡してくる認証コード(code)を含めて
https://graph.facebook.com/oauth/access_token?client_id= AppID&redirect_uri= https://usewill.com/facebook.cgi(URLエンコードしておく)&client_secret= AppSecret&code= step3で渡された認証コード(code)
という内容で再度Facebook graph APIにアクセスすると
access_token=xxxxxxxxxxxxxxxx
という内容がページ内容として帰ってきて、かつredirect_uriに転送される。
※step3→step4は同じスクリプト内などでシームレスにやる必要があるようだ。たとえばいったん認証コードを保存し、手作業でstep4を実行するとエラーとなる。制限時間がある？よく分からない。
※step1とstep4のredirect_uriは同じじゃないとエラーが出る。
※Facebook graph APIはhttpsでアクセスしないとダメ、Crypt::SSLeayがインストールされてなくてLWPでhttpsアクセス出来ない糞レンタルサーバーじゃダメっす。
(4)実際の投稿プロセス
いったんaccess_tokenが取得出来れば＜form action="https://graph.facebook.com/ あなたのUserID/feed" method="post"＞
＜form action="https://graph.facebook.com/me/feed" method="post"＞でOK
＜input type="hidden" name="access_token" value=" 取得したaccess_token"＞
＜input type="hidden" name="picture" value=" 投稿した画像のURL(無くてもOK)"＞
＜input type="text" name="message" value=" メッセージ"＞
＜input type=submit name="submit" value="submit"＞
＜/form＞
的な内容をPOSTすれば投稿し放題。画像をURLで渡せるのは便利だね。直接データとして渡せる方法があるかどうかは不明。
ご参考。
さぁ、何作ろうかな♪
参考にしたページ
Category:Perl・Javascript・python、サーバー管理メモ
コメント
この記事のアクセス数:40662025.01.25正規表現のオンラインWebチェッカー
2021.12.05中国のSippedが50ドルQVGAののToFカメラユニットを今年中に出荷開始。UVC、UART/SPI出力3コメ
2021.12.05Pythonのコードをワンラインで実行形式に変換してくれるPyInstaller1コメ
2021.12.03チャート、グラフを書くのに良さそうなGoogle Chart以外のJavascriptライブラリ5つ3コメ
2021.11.18まだ使ってる？今は非推奨となったJavaScriptの書き方。document.writeが強く非推奨だと！！！？4コメ
2021.10.19PerlのGD::Image->new()は画像じゃないデータを読み込ませるとエラーになることがあるので事前に手動で画像であることを確認した方が良い1コメ
2021.10.12【解決済み】ヨドバシとかZOZOのサイトにどうやってもスクリプトからアクセス出来ない16コメ
2021.08.31現代的なPerlの記述方法一覧2コメ
2021.07.09JavaScriptでワンタッチで仮想キーボードを表示する2コメ
2021.02.10PythonでPowerPointを作るライブラリ「python-pptx」が色々活用出来そう。22コメ
→カテゴリー：Perl・Javascript・python、サーバー管理メモ(記事数:82)
アクセス数の多い記事(過去1ヶ月)
隨ｳ�ｽ2025.03.20:邵ｺ�ｩ郢ｧ阮吮�闕ｳ蝓ｼ�ｽ陷ｷ蛹ｻ窶ｲ郢晢ｽｻ郢晢ｽｻ郢晢ｽｻ(隴幢ｽｪ陋ｻ�ｽ�｡�ｽ)681access
隨ｳ�ｽ2025.03.14:8陝ｷ�ｴ邵ｺ�ｶ郢ｧ鄙ｫ竊鍋ｹｧ�ｵ郢晢ｽｳ郢晢ｽｩ郢ｧ�､郢ｧ�ｺ陷�ｽｺ鬮ｮ�ｲ邵ｺ�ｫ闕ｵ闍難ｽｻ螂�ｽｼ竏晢ｽｮ�ｶ隴鯉ｿｽ4闔��ｺ邵ｺ�ｧ邵ｲ蠕後◆郢晢ｽｭ陋溷唱�ｮ�､邵ｲ�ｽ4鬩幢ｽｨ陞ｻ荵昶�闕ｳ鄙ｫ�願嵯闍難ｽｻ鄙ｫ��邵ｺ貅佩鍋ｹ晢ｽ｢(#邵ｺ鄙ｫ縲堤ｸｺ荵晢ｿ�隲��ｽ�ｽ�ｱ)485access
隨ｳ�ｽ2025.03.16:陞滂ｽｧ鬩･荳奇ｿｽ郢晢ｽｬ郢晢ｽ｢郢晢ｽｳ郢ｧ蜑�ｽｽ蜷ｶ��ｸｺ螢ｽ譽｡雎寂悪�ｵ讒ｭ�狗ｸｺ�ｮ邵ｺ遒∝ｱｮ邵ｺ蜉ｱ�樒ｸｲ繧�ｽｮ蟲ｨ�樣お讒ｭ�願搦�ｨ邵ｺ�ｯ郢ｧ�ｯ郢ｧ�ｽ邵ｺ�ｰ邵ｺ荵晢ｽ�(#髢ｾ�ｪ陞ｳ�ｽDIY #郢晢ｽｫ郢晢ｽｼ郢晁ｼ斐Θ郢晢ｽｩ郢ｧ�ｹ雎｢�ｻ騾包ｽｨ)446access
隨ｳ�ｽ2025.03.11:陋ｻ譏ｴ�∫ｸｺ�ｦ邵ｺ�ｮ霎滂ｽｼ邵ｺ蟠趣ｽ臥ｸｺ髦ｪ�鍋ｸｺ謦ｰ�ｼ閧ｲ鮟�坡讒ｭ縺慕ｹ晢ｽｼ郢晄亢ﾎ樒ｹ晢ｽｼ郢ｧ�ｷ郢晢ｽｧ郢晢ｽｳ)邵ｺ�ｮ隴ｬ�ｪ闕ｳ�ｻ陷�ｽｪ陟包ｿｽ笙鬯滓ｻ会ｽｺ蜿･陌ｻ郢ｧ蛛ｵ縺皮ｹ晢ｿｽ繝ｨ�ｽ�ｽ�ｼ�ｽ�ｼ�ｽ�ｼ�ｽ�ｼ竏昶煤陟包ｿｽ�ｽ鬩滓ｦ奇ｽｽ轣倩懸陜玲ｧｭ�願濤�ｴ驍�ｿｽ3�ｽ�ｽ�ｨ蜿･�ｺ�ｦ(#邵ｺ莨≫横 #郢晄ｧｭ繝ｭ郢晢ｽｼ)363access
隨ｳ�ｽ2025.03.17:邵ｺ蜷ｶﾂｰ邵ｺ�ｽ�臥ｹ晢ｽｼ邵ｺ遘汽邵ｺ�ｮ隴ｬ�ｪ郢ｧ雋樒ｩ隶鯉ｽｭ邵ｺ蜉ｱ窶ｻ44闕ｳ�ｽ�ｽ郢ｧ�ｲ郢晢ｿｽ繝ｨ邵ｲ繧域呵�募ｾ鯉ｿｽ隴ｬ�ｪ闕ｳ�ｻ陷�ｽｪ陟包ｿｽ�定愾驤ｴ�ｽ�ｽ(#邵ｺ莨≫横 #郢晄ｧｭ繝ｭ郢晢ｽｼ)358access
