注目コメント算出アルゴリズムの一部にLINEヤフー株式会社の「建設的コメント順位付けモデルAPI」を使用しています
Perl5.10 以後のみ対応だけど、5.10 以後ならこんな簡単なのでいいのかも。 package MojaMoja; use stri... Perl5.10 以後のみ対応だけど、5.10 以後ならこんな簡単なのでいいのかも。 package MojaMoja; use strict; use warnings; use parent 'Exporter'; use 5.01000; our $VERSION = '0.01'; use Plack::Request; use Plack::Response; our @EXPORT = qw/get put post Delete zigorou res/; my @ROUTE; BEGIN { no strict 'refs'; for my $meth (qw/get put post Delete/) { my $method = uc $meth; *{$meth} = sub ($$) { my $pattern = $_[0]; push @ROUTE, { reg
2010/03/18 リンク