PerlのTwitterモジュールの紹介

2012/03/21 に Twitter API 勉強会＠渋谷 で発表したスライドです。

Transcript

1. PerlͷTwitter Ϟδϡʔϧͷ঺հ גࣜձࣾfonfun ඌܗ మ࣍ (OGATA Tetsuji) Twitter: @xtetsuji 2012/03/21
2. ࣗݾ঺հ
3. ࣗݾ঺հ • ඌܗ మ࣍ (OGATA Tetsuji) • Twitter: @xtetsuji • Blog: http://post.tetsuji.jp/ • Α͘ॻ͘΋ͷ: Perl / Shell Script / JavaScript • ʮTwitter APIษڧձʯ͸લճॳग़੮Ͱɺ ͻΐΜͳ͜ͱ͔ΒLTΛ͢Δ͜ͱʹͳͬͨ
4. ॴଐ঺հ • גࣜձࣾfonfun(ϑΥϯϑΝϯ) http://www.fonfun.co.jp/ • ओྗ੡඼ɿϦϞʔτϝʔϧ http://rmail.jp/ (Twitter: @rmailjp) • Hokkaido.pm http://hokkaido.pm.org/ (Twitter: @hokkaidopm)
5. ͸͡Ίʹ • ֶੜͷօ͞Μɺࣾձਓͷօ͞Μɺ Java HackerͷΈͳ͞Μɺ͜Μʹͪ͸ • Java͸શવॻ͚·ͤΜ(͢Έ·ͤΜ) • PerlΛ໿9೥ॻ͍͍ͯ·͕͢ɺͦΕ΄Ͳ Perl΋஌Γ·ͤΜ(஌͕ࣝภ͍ͬͯΔ)
6. ͸͡Ίʹ • ͱ͍ͬͨΘ͚Ͱɺࢲ͸Perlͷ୅දͱ͍͏ ྗྔ΋ͳ͍ͷͰɺ͋·Γظ଴͠ͳ͍Ͱ Լ͍͞ • Apache mod_perl͸ৄ͍͠΄͏Ͱ͢
7. Agenda
8. Agenda • ΠϚυΩͷPerlͷ঺հ • Perlʹৄ͘͠ͳ͍ਓ޲͚ɿPerl؀ڥߏங • Twitterؔ࿈ͷPerlϞδϡʔϧΛ͍͔ͭ͘ ঺հ
9. ΠϚυΩͷPerlͷ঺հ
10. ΠϚυΩͷPerlͷ঺հ • ܰྔݴޠͰΑ͋͘Δޡղ • ݹ͍: Perl • ৽͍͠: PHP, Python, Ruby
11. ΠϚυΩͷPerlͷ঺հ • ਖ਼͍͠ཧղ • ೔ʑਐԽΛଓ͚͍ͯΔ: Perl, PHP, Python, Ruby • Perl͸ࠓ΋ʮݹ͍ʯͷͰ͸ܾͯ͠ແ͘ ʮݹ͔͘Β͋Δʯͱ͍͏ઌൃͳ͚ͩ • ݕࡧͰग़ͯ͘Δʮݹ͍৘ใʯ͕ωοΫ
12. ΠϚυΩͷPerlͷ঺հ • Perl͸ࠓ΋༷ʑͳϋοΧʔ(Perl Monger) ʹΑͬͯ೔ʑਐԽΛଓ͚͍ͯΔ • ͢΂ͯ͸঺հ͖͠Ε·ͤΜ͕ɺࠓճͷ ࿩ͷϕʔεͱͯ͠໾ʹཱͭ࿩Λগ͠…
13. ΠϚυΩͷPerlͷ঺հ • ؀ڥߏங: Perlbrew • Rubyͷrvm(Ruby Version Manager)ɺ PythonͷpythonbrewͷΑ͏ͳ΋ͷ • طଘͱ͸ผͷPerl؀ڥΛ؆୯ʹ࡞Δࣄ ͕Ͱ͖Δ΋ͷ
14. Perlbrew • ৄ͘͠͸ http://perlbrew.pl/ Λࢀর͢Δ ͔ɺ”perlbrew” Ͱݕࡧͯ͠ΈΔ • ͱͯ΋؆୯ • OS(Distribution)ඪ४ͷPerl؀ڥΛԚͣ͞ ʹࡁΉ
15. Perlbrew
16. Perlbrew • PerlbrewͷΠϯετʔϧ • $ curl -kL http://install.perlbrew.pl | bash • γΣϧ؀ڥม਺ͷઃఆ(.bashrcʹ௥ه) • source ~/perl5/perlbrew/etc/bashrc • ͜Ε͚ͩ
17. Perlbrew • Perlbrewͷ஫ҙ఺ • Ϗϧυʹඞཁͳ؀ڥ͕ඞཁ • Linux(e.g. Debian)ͩͱbuild-essential • Mac OS X ͩͱ Xcode + α
18. Perlbrew • PerlbrewͰ Perl 5.14.2 ΛΠϯετʔϧ • perlbrew install perl-5.14.2
19. Perlbrew • Perl 5.14.2 ͕ೖͬͨΒ࢖͑ΔΑ͏ʹ͢Δ • $ perlbrew switch perl-5.14.2 • cpanm (App::cpanminus) ΋ೖΕΔ • $ perlbrew install-cpanm cpanm ίϚϯυ͕࢖͑ΔΑ͏ʹͳΔ
20. Perl and CPAN
21. Perl and CPAN • CPAN (͠ʔͺΜ) = Comprehensive Perl Archive Network • PerlϞδϡʔϧͷڊେͳϥΠϒϥϦ
22. Perl and CPAN
23. Perl and CPAN
24. Perl and CPAN • Ϟδϡʔϧݕࡧ͸ metacpan.org ͔ search.cpan.org Ͱߦ͑Δ • ͦΕͰ͸ search.cpan.org ͰʮTwitterʯΛ ݕࡧͯ͠ΈΔ͜ͱʹ…
25. Twitter Module of Perl
26. Twitter Module of Perl
27. Twitter Module of Perl • ࠓճ͸144ݸݟ͔ͭͬͨ • ͪͳΈʹ “Tweet” Ͱ͸51ݸݟ͔ͭͬͨ • ͲΕΛ࢖͏ͱΑ͍͔͸ɺ׆ൃʹϝϯς φϯε͞Ε͍ͯΔ͔͕Ұͭͷࢦඪ • ࠷ऴߋ৽೔͕ҰͭͷࢀߟʹͳΓ·͢
28. Twitter Module of Perl • େ͖͘෼͚ͯҎԼͷΑ͏ͳ΋ͷ͕͋Δ • ୯ମͰ࢖͑ΔAPIͷϥούʔ • ԿΒ͔ͷϑϨʔϜϫʔΫͷϓϥάΠϯ (WAFؚΉ)
29. Twitter Module of Perl • ͨͿΜ࣌ؒ΋ࠩ͠ഭ͖ͬͯͨ͜Ζͳͷ Ͱɺ͍͔ͭ͘ओཁͳϞδϡʔϧΛ঺հ • ԿΒ͔ͷϑϨʔϜϫʔΫͷϓϥάΠϯ ͱͯ͠ͷTwitterϞδϡʔϧ͸ׂѪ
30. Net::Twitter • OAuth͔Β౤ߘ·ͰɺҰ࿈ͷREST APIʹ ରԠ͢Δϝιου͕ἧ͍ͬͯΔ • ଟ͘ͷPerl TwitterϞδϡʔϧ΋͜ΕΛ ࢖͍ͬͯΔέʔε͕ଟ͍(ͬΆ͍) • ಉ͡࡞ऀͷܰྔ൛Ϟδϡʔϧ Net::Twitter::Lite΋͋Δ
31. AnyEvent::Twitter:: Stream • ͪ͜Β͸REST APIͰ͸ͳ͘Twitterͷ Streaming APIΛར༻Ͱ͖Δ΋ͷ • ϞμϯͳPerlͰσϑΝΫτελϯμʔυ Ͱ͋ΔΠϕϯτۦಈϑϨʔϜϫʔΫ AnyEventΛϕʔεͱͨ͠Ϟδϡʔϧ
32. Tweet::ToDelicious • ͪ͜Β͸Ԡ༻ϞδϡʔϧͷҰྫ • Twitter APIʹAnyEvent::Twitter::StreamΛ ࢖ͬͨϞδϡʔϧ • πΠʔτʹURLؚ͕·Ε͍ͯͨΒࢦఆͷ DeliciousΞΧ΢ϯτʹϒοΫϚʔΫొ࿥ ͕Ͱ͖Δ
33. ؆୯ͳαϯϓϧ
34. ؆୯ͳαϯϓϧ • ϞμϯͳPerlͷ؀ڥ͸PerlbrewͰ࡞Εͨ • cpanm΋ೖΕͨ • ඞཁͳϞδϡʔϧͷΠϯετʔϧ • $ cpanm AnyEvent::Twitter::Stream • ґଘϞδϡʔϧ΋ࣗಈతʹೖΔ
35. ؆୯ͳαϯϓϧ • AnyEvent::Twitter::StreamΛ࢖ͬͯɺݕࡧ ΛோΊͳ͕ΒৄࡉΛϩάʹه࿥͢Δɺ ؆୯ͳΞϓϦέʔγϣϯΛ࡞ͬͯΈΔ • https://gist.github.com/2139804 twitter-stream-search.pl (by xtetsuji) • ͨͿΜखܰʹࢼͤΔ͸ͣ
36. ؆୯ͳαϯϓϧ DEMO
37. ·ͱΊ
38. ·ͱΊ • Perlʹ΋TwitterͷREST API΍Streaming APIΛ࢖͏Ϟδϡʔϧ͕ॆ࣮͍ͯ͠Δ • Perlࣗମ΋ࠓ΋ϞμϯʹਐԽ͍ͯ͠Δ • Έͳ͞Μ΋Perlॻ͍ͯΈ·ͤΜ͔ʁ
39. ࣭໰ / ؾʹͳΔ఺ • ࠙਌ձʹग़·͢ͷͰɺͦͷ࣌ʹؾܰʹ ੠Λ͔͚ͯԼ͍͞(تͼ·͢) • perlbrew/cpanmͷΠϯετʔϧͰ͏·͘ ߦ͔ͳ͍౳͋Ε͹ɺࢲʹڠྗͰ͖Δ͜ ͱ͕͋Δ͔΋͠Ε·ͤΜ(࣭໰׻ܴ) • ݕࡧ͢Δͱ৭ʑग़͖ͯ·͢(ଞྗຊئ)
40. ͝ਗ਼ௌ ͋Γ͕ͱ͏͍͟͝·ͨ͠