Mojo-SinaWeibo
view release on metacpan or search on metacpan
user=>'xxxxx',#å¾®åå¸å·
pwd=>'xxxx', #å¸å·å¯ç
);
$m->ask_xiaoice("ä½ æ¯è°",sub{print Dumper \@_}); #ä¸æä½¿ç¨UTF8ç¼ç
$m->run(enable_api_server=>1,host=>"127.0.0.1",port=>8000);
###APIè°ç¨ç¤ºä¾
> GET /openxiaoice/ask?q=hello HTTP/1.1 #ä¸æè¯·ä½¿ç¨UTFç¼ç è¿è¡urlencode
> User-Agent: curl/7.15.5 (x86_64-redhat-linux-gnu) libcurl/7.15.5
> Host: 127.0.0.1:8000
> Accept: */*
>
< HTTP/1.1 200 OK
< Server: Mojolicious (Perl)
< Content-Type: application/json;charset=UTF-8
< Connection: keep-alive
< Date: Fri, 12 Jun 2015 08:01:08 GMT
< Content-Length: 52
Connection #0 to host 127.0.0.1 left intact
* Closing connection #0
{"code":1,"answer":"hello.è¿ä¹å·§ä½ ä¹å¤±ç äº"}
###è¿è¡æ¥å¿
[15/06/12 16:00:47] [info] åå¤ç»å½å¾®åå¸å·[ xxxx ]
[15/06/12 16:00:47] [info] æ£å¨ç»å½...
[15/06/12 16:00:49] [info] ç»å½æå
[15/06/12 16:00:49] [info] http server available at 0.0.0.0:8000
[15/06/12 16:00:49] [ç§ä¿¡æ¶æ¯] æ->å°å° : ä½ æ¯è°
[15/06/12 16:00:51] [ç§ä¿¡æ¶æ¯] æ->å°å° : howareyou
[15/06/12 16:00:51] [ç§ä¿¡æ¶æ¯] å°å° : ææ¯å°ç°åï¼éªå¨ä½ 身边çç¥å¿äºº
[15/06/12 16:00:52] [ç§ä¿¡æ¶æ¯] å°å° : æç¸ç¸ç»æä¹°äºä¸ªè¡¨
[15/06/12 16:01:00] [ç§ä¿¡æ¶æ¯] æ->å°å° : hello
[15/06/12 16:01:08] [ç§ä¿¡æ¶æ¯] å°å° : hello.è¿ä¹å·§ä½ ä¹å¤±ç äº
###å®è£
æ¥éª¤
æ¨è使ç¨[cpanm](https://metacpan.org/pod/distribution/App-cpanminus/bin/cpanm)å¨çº¿å®è£
[Mojo::SinaWeibo](https://metacpan.org/pod/Mojo::SinaWeibo)模å
1. *å®è£
cpanmå·¥å
·*
æ¹æ³aï¼ éè¿cpanå®è£
cpanm
$ cpan -i App::cpanminus
æ¹æ³bï¼ ç´æ¥å¨çº¿å®è£
cpanm
$ curl -L http://cpanmin.us | perl - App::cpanminus
2. *使ç¨cpanmå¨çº¿å®è£
Mojo::SinaWeibo 模å*
$ cpanm -v Mojo::SinaWeibo
3. *å®è£
失败å¯è½æå¸®å©çè§£å³æ¹æ³*
å¦æä½ è¿æ°ä¸ä½³ï¼éè¿cpanm没æä¸æ¬¡æ§å®è£
æåï¼è¿éæä¾äºä¸äºå¯è½æç¨çä¿¡æ¯
å¨å®è£
Mojo::SinaWeibo çè¿ç¨ä¸ï¼cpanæè
cpanmä¼å¸®å©æä»¬èªå¨å®è£
å¾å¤å
¶ä»çä¾èµæ¨¡å
å¨ä¼å¤çä¾èµæ¨¡åä¸ï¼å®è£
ç»å¸¸å®¹æåºç°é®é¢çä¸»è¦æ¯ IO::Socket::SSL
IO::Socket::SSL ä¸»è¦æä¾äº https æ¯æï¼å¨å®è£
è¿ç¨ä¸å¯è½ä¼æ¶åå°SSLç¸å
³åºçç¼è¯
å¯¹äº Linux ç¨æ·ï¼é常éç¨çæ¯ç¼è¯å®è£
çæ¹å¼ï¼ç³»ç»ç¼ºå°ç¼è¯å®è£
å¿
è¦çç¯å¢ï¼åä¼å¯¼è´ç¼è¯å¤±è´¥
å¯¹äº Windows ç¨æ·ï¼ç±äºä¸å
·å¤è¯å¥½çç¼è¯å®è£
ç¯å¢ï¼æ¨èéç¨ä¸äºå·²ç»æå
æ¯è¾å
¨é¢çPerlè¿è¡ç¯å¢
ä¾å¦æ¯è¾æµè¡ç strawberryperl æè
activeperl çææ°çæ¬é½é»è®¤å
å« Mojo::SinaWeibo çæ ¸å¿ä¾èµæ¨¡å
RedHat/Centos:
$ yum install -y openssl-devel
Ubuntu:
$ sudo apt-get install libssl-dev
Window:
è¿é以 strawberryperl 为ä¾
å®è£
[Strawberry Perl](http://strawberryperl.com/)ï¼è¿æ¯ä¸ä¸ªå·²ç»å
å« Mojo::SinaWeibo æéæ ¸å¿ä¾èµçè¾å
¨é¢çWindows Perlè¿è¡ç¯å¢
[32ä½ç³»ç»å®è£
å
](http://strawberryperl.com/download/5.22.0.1/strawberry-perl-5.22.0.1-32bit.msi)
[64ä½ç³»ç»å®è£
å
](http://strawberryperl.com/download/5.22.0.1/strawberry-perl-5.22.0.1-64bit.msi)
æè
èªå·±å° [Strawberry Perlå®ç½](http://strawberryperl.com/) ä¸è½½éåèªå·±çææ°çæ¬
å®è£
åæå¥½å
å¸è½½ç³»ç»ä¸å·²ç»å®è£
çå
¶ä»Perlçæ¬ä»¥å
äºç¸å½±å
æå®äºç¼è¯åè¿è¡ç¯å¢ä¹åï¼åéæ°åå° æ¥éª¤2 å®è£
Mojo::SinaWeibo å³å¯
###æ ¸å¿ä¾èµæ¨¡å
* Mojolicious
* Crypt::RSA
* Encode::Locale
###çæ¬æ´æ°è®°å½
请åè§ Changes æä»¶
###COPYRIGHT å LICENCE
Copyright (C) 2014 by sjdy521
This library is free software; you can redistribute it and/or modify
it under the same terms as Perl itself, either Perl version 5.10.0 or,
at your option, any later version of Perl 5 you may have available.
( run in 1.431 second using v1.01-cache-2.11-cpan-8f98c5d2c55 )