The new Text::Hatena

https://github.com/onishi/Text-Hatena

Transcript

1. ͜ ͷ Ն ͷ ࠷ ৽ 5FYU)BUFOB Λ͓ಧ͚͠·͢  େ੢߁༟
   JEPOJTIJ
   ͸ͯͳ
2. ࣗݾ঺հ w JEPOJTIJ
   
   େ੢߁༟ w גࣜձࣾ͸ͯͳ
   ʙ w νʔϑΤϯδχΞ w ͸ͯͳϒϩάσΟϨΫλʔ w !ZBTVIJSP@POJTIJ w 1"64&
   0/*4)*
   
   %FWFM,:51SPG
3. 5FYU)BUFOB
   ͱ͸ ͸ ͯ ͳ ه ๏ Λ )5.-ʹม׵ ͢ΔϞδϡʔϧ
4. ͸ͯͳه๏ͱ͸ w ͸ͯͳϒϩά΍͸ͯͳμΠΞϦʔ΍͸ͯͳά ϧʔϓͰ࢖͑Δॻࣜ w ͔ΜͨΜͳهड़Ͱ)5.-จॻߏ଄΍ࣗಈϦϯ Ϋ͕ॻ͚Δ w IBUFOBEJBSZHIBUFOBOFKQLFZXPSE ͸ͯͳه๏Ұཡ
5. ೖྗࢧԉʢϒϩοΫه๏ʣ
6. ࣗಈϦϯΫʢΠϯϥΠϯه๏ʣ
7. ͨ͘͞Μͷ5FYU)BUFOB w 5FYU)BUFOB
   ʙ
   KLPOEP w IUUQTNFUBDQBOPSHSFMFBTF+,0/%05FYU)BUFOB w 5FYU)BUFOB
   
   KLPOEP w IUUQTNFUBDQBOPSHNPEVMF5FYU)BUFOB w 5FYU9BUFOB
   DIP w IUUQTNFUBDQBOPSHNPEVMF5FYU9BUFOB w 5FYU)BUFOB-JUF
   XBLBCBUBO w IUUQTHJUIVCDPNXBLBCBQFSMUFYUIBUFOBMJUF
8. 5FYU)BUFOB
   
   ʙ use  Text::Hatena;  #  0.16 my  $parser  =  Text::Hatena-­‐>new;      $parser-­‐>parse($text); my  $html  =  $parser-­‐>html;  
9. 5FYU)BUFOB
   
    use  Text::Hatena;  #  0.20 my  $html  =  Text::Hatena-­‐>parse($text);  
10. 5FYU9BUFOB use  Text::Xatena; my  $thx  =  Text::Xatena-­‐>new;      $thx-­‐>format($string);
11. 5FYU)BUFOB-JUF use  Text::HatenaLite::Parser; my  $html  =  Text::HatenaLite::Parser -­‐>parse_string($string);
12. ΋ͬͱͨ͘͞Μͷʜ •Hatena::Diary::HTMLParserBody •Hatena2::Group::HTMLParserBody •Hatena::Bookmark::TextFormat •Hatena::Haiku::Body
13. )BUFOB%JBSZ)5.-1BSTFS#PEZ w ࠷ॳͷ͸ͯͳه๏
    1BSTFS w ೥·Ͱςετͳ͔ͬͨ w ߦͷϝιου w·ͩ࢖ΘΕ͍ͯ·͢ʜ
14. )%)5.-1BSTFS#PEZNBLFMJOL
15. ه๏ల։ͷ೉͠͞  w ͸ͯͳه๏͸)5.-λά͕࢖͑Δ w ίϝϯτه๏ w εʔύʔ13&ه๏ ςΩετΛ)5.-ʹ͢Δ΋ͷ͚ͩͲ )5.-1BSTFSϕʔε
16. ه๏ల։ͷ೉͠͞  <script> ͜͜͸ه๏ల։͠ͳ͍Α </script> <!-­‐-­‐ ͜͜͸ফ͑ΔΑ -­‐-­‐> >|| ه๏ల։͠ͳ͍ͰPREʹͳΔΑ ||<
17. ه๏ల։ͷ೉͠͞  <script> >|| ͜͜͸Ͳ͏ͳΔʁ ||<   </script> >|| <!-­‐-­‐ ͜͜͸Ͳ͏ͳΔʁ -­‐-­‐> ||<
18. ه๏ల։ͷ೉͠͞  ه๏ͱ)5.-Λ ಉ࣌ʹղऍ͠ͳ ͚Ε͹͍͚ͳ͍
19. ه๏ల։ͷ೉͠͞  w ه๏ͷల։ w ΩʔϫʔυϦϯΫ w 944ରࡦ ϗϫΠτϦετʹΑΔTDSJQU੍ݶ ͭͷ͜ͱΛಉ࣌ʹ΍͍ͬͯΔ
20. ه๏ల։ͷ೉͠͞  w ه๏ͱΩʔϫʔυϦϯΫ͕ີ݁߹͍ͯ͠Δ w <>ΩʔϫʔυϦϯΫ͠ͳ͍ه๏<> w ه๏ల։͢ΔͱҙຯΛࣦ͏ Ͳ͏ͯ͜͠͏ͳͬͨ
21. ه๏ల։ͷ೉͠͞  ه๏ల։ͱΩʔϫʔ υϦϯΫΛಉ࣌ʹߦ Θͳ͚Ε͹ͳΒͳ͍
22. ͜ͷͨΊ ه๏ల։ͱΩʔϫʔυϦϯΫ͕ີ݁ ߹Ͱ͋ΔͨΊɺ5FYU)BUFOB
    ͳ Ͳͷه๏ల։͚ͩͷϞδϡʔϧΛ ࡞ͬͯ΋ɺ࣮ࡍͷϓϩμΫτʢ͸ͯ ͳμΠΞϦʔʣͰར༻Ͱ͖ͳ͔ͬͨ
23. Ͳ͏͠Α͏
24. ϝλσʔλʹΑΔૄ݁߹Խ ه๏ల։࣌ʹ ʮ͜ΕҎ্ϦϯΫ͠ͳ͍ʯͱ͍͏ ΧελϜσʔλଐੑΛ෇༩ <span data-unlink> ͜͜͸͜ΕҎ্ϦϯΫ͠ͳ͍ </span>
25. ϝλσʔλʹΑΔૄ݁߹Խ wه๏ύʔα w EBUBVOMJOLଐੑΛ෇༩ wΩʔϫʔυϦϯΧ w EBUBVOMJOLଐੑΛݟͯϦϯΫΛ൑அ ૄ݁߹Խ }
26. The new Text::Hatena w 5FYU9BUFOB
    ˜DIP
    Λϕʔεʹ w ΧελϜσʔλଐੑΛ࢖ͬͯه๏ల։ͱΩʔ ϫʔυϦϯΫΛૄ݁߹Խ w աڈʢ΍ྨࣅʣͷΠϯλʔϑΣʔεޓ׵ w ଟ͘ͷ͸ͯͳه๏ʹରԠ w࣮ࡍʹ͸ͯͳϒϩάͰར༻͍ͯ͠Δ
27. ΠϯλʔϑΣʔεޙํޓ׵ use Text::Hatena; my $parser = Text::Hatena->new; my $html = $parser->parse($string); # Text::Hatena 0.16 style my $html = $parser->html; # Text::Hatena 0.20 style my $html = Text::Hatena->parse($string); # Text::Xatena style my $html = $parser->format($string);
28. ୯ମͰ΋࢖͑ΔศརϞδϡʔϧ •Text::Hatena::Keyword w ΩʔϫʔυϦϯΧ •Text::Hatena::Embed w 63-ຒΊࠐΈࢧԉ <IUUQFNCFE>ه๏
29. 5FYU)BUFOB,FZXPSE EBUBVOMJOL
    ଐੑΛߟྀͯ͠ΩʔϫʔυϦϯΫ my $parser = Text::Hatena::Keyword->new( rules => [ qr/hoge|fuga/ => sub { sprintf '/keyword/%s', uri_escape($_) }, [qw/foo bar/] => sub { sprintf '/other/%s', uri_escape($_) }, ], ); my $words = $parser->extract($html); # நग़ my $formatted_html = $parser->format($html); # ϦϯΫ
30. 5FYU)BUFOB&NCFE 63-Λ౉͢ͱ͍͍ײ͡ʹFNCFE my $embed = Text::Hatena::Embed->new; my $html = $embed->render($url); XXXTMJEFTIBSFOFUPOJTIJPFNCFEUFYUIBUFOB
31. ຊ೔ެ։͠·ͨ͠ HJUIVCDPNPOJTIJ5FYU)BUFOB Ͳ͏ͧ͝ར༻͍ͩ͘͞ QVMM
    SFRVFTU
    ͍ͩ͘͞
32. ͸ͯͳϒϩά ि࿈ଓ৽ػೳϦϦʔεத ೔ຊҰ։ൃ͕ϗοτͳϒϩά hatenablog.com
33. ਓࡐืू wגࣜձࣾ͸ͯͳͰ͸ΤϯδχΞͦͷଞ શ৬छΛืू͍ͯ͠·͢ wҰॹʹϒϩάΛ࡞Γ·͠ΐ͏ʂ www.hatena.ne.jp/company/staff
34. ͝ਗ਼ௌ͋Γ͕ͱ͏͍͟͝·ͨ͠