initial commit

11 files changed, 122 insertions, 0 deletions

diff --git a/.gitignore b/.gitignore
new file mode 100644
index 0000000..c38068c
--- /dev/null
+++ b/.gitignore
@@ -0,0 +1,11 @@
+cover_db
+META.yml
+Makefile
+blib
+inc
+pm_to_blib
+MANIFEST
+Makefile.old
+nytprof.out
+MANIFEST.bak
+*.sw[po]
diff --git a/.shipit b/.shipit
new file mode 100644
index 0000000..e28b215
--- /dev/null
+++ b/.shipit
@@ -0,0 +1,6 @@
+steps = FindVersion, ChangeVersion, CheckChangeLog, DistTest, Commit, Tag, MakeDist
+git.tagpattern = release-%v
+git.push_to = release
+
+CheckChangeLog.files = Changes
+MakeDist.destination = ~/code/distribs/
diff --git a/Changes b/Changes
new file mode 100644
index 0000000..9ceae61
--- /dev/null
+++ b/Changes
@@ -0,0 +1,4 @@
+Revision history for Perl extension Plack::Middleware::APIRateLimit
+
+0.01    Sun Feb 28 17:13:45 2010
+        - original version
diff --git a/Makefile.PL b/Makefile.PL
new file mode 100644
index 0000000..5297eaa
--- /dev/null
+++ b/Makefile.PL
@@ -0,0 +1,13 @@
+use inc::Module::Install;
+name 'Plack-Middleware-APIRateLimit';
+all_from 'lib/Plack/Middleware/APIRateLimit.pm';
+
+# requires '';
+
+tests 't/*.t';
+author_tests 'xt';
+
+build_requires 'Test::More';
+use_test_base;
+auto_include;
+WriteAll;
diff --git a/README b/README
new file mode 100644
index 0000000..722437a
--- /dev/null
+++ b/README
@@ -0,0 +1,27 @@
+This is Perl module Plack::Middleware::APIRateLimit.
+
+INSTALLATION
+
+Plack::Middleware::APIRateLimit installation is straightforward. If your CPAN shell is set up,
+you should just be able to do
+
+    % cpan Plack::Middleware::APIRateLimit
+
+Download it, unpack it, then build it as per the usual:
+
+    % perl Makefile.PL
+    % make && make test
+
+Then install it:
+
+    % make install
+
+DOCUMENTATION
+
+Plack::Middleware::APIRateLimit documentation is available as in POD. So you can do:
+
+    % perldoc Plack::Middleware::APIRateLimit
+
+to read the documentation online with your favorite pager.
+
+franck cuny
diff --git a/lib/Plack/Middleware/APIRateLimit.pm b/lib/Plack/Middleware/APIRateLimit.pm
new file mode 100644
index 0000000..905e944
--- /dev/null
+++ b/lib/Plack/Middleware/APIRateLimit.pm
@@ -0,0 +1,33 @@
+package Plack::Middleware::APIRateLimit;
+
+use strict;
+use warnings;
+our $VERSION = '0.01';
+
+1;
+__END__
+
+=head1 NAME
+
+Plack::Middleware::APIRateLimit -
+
+=head1 SYNOPSIS
+
+  use Plack::Middleware::APIRateLimit;
+
+=head1 DESCRIPTION
+
+Plack::Middleware::APIRateLimit is
+
+=head1 AUTHOR
+
+franck cuny E<lt>franck.cuny@rtgi.frE<gt>
+
+=head1 SEE ALSO
+
+=head1 LICENSE
+
+This library is free software; you can redistribute it and/or modify
+it under the same terms as Perl itself.
+
+=cut
diff --git a/t/00_compile.t b/t/00_compile.t
new file mode 100644
index 0000000..8db29e4
--- /dev/null
+++ b/t/00_compile.t
@@ -0,0 +1,4 @@
+use strict;
+use Test::More tests => 1;
+
+BEGIN { use_ok 'Plack::Middleware::APIRateLimit' }
diff --git a/xt/01_podspell.t b/xt/01_podspell.t
new file mode 100644
index 0000000..45cbdbf
--- /dev/null
+++ b/xt/01_podspell.t
@@ -0,0 +1,10 @@
+use Test::More;
+eval q{ use Test::Spelling };
+plan skip_all => "Test::Spelling is not installed." if $@;
+add_stopwords(map { split /[\s\:\-]/ } <DATA>);
+$ENV{LANG} = 'C';
+all_pod_files_spelling_ok('lib');
+__DATA__
+franck cuny
+franck.cuny@rtgi.fr
+Plack::Middleware::APIRateLimit
diff --git a/xt/02_perlcritic.t b/xt/02_perlcritic.t
new file mode 100644
index 0000000..b977df8
--- /dev/null
+++ b/xt/02_perlcritic.t
@@ -0,0 +1,8 @@
+use strict;
+use Test::More;
+eval {
+    require Test::Perl::Critic;
+    Test::Perl::Critic->import( -profile => 'xt/perlcriticrc');
+};
+plan skip_all => "Test::Perl::Critic is not installed." if $@;
+all_critic_ok('lib');
diff --git a/xt/03_pod.t b/xt/03_pod.t
new file mode 100644
index 0000000..437887a
--- /dev/null
+++ b/xt/03_pod.t
@@ -0,0 +1,4 @@
+use Test::More;
+eval "use Test::Pod 1.00";
+plan skip_all => "Test::Pod 1.00 required for testing POD" if $@;
+all_pod_files_ok();
diff --git a/xt/perlcriticrc b/xt/perlcriticrc
new file mode 100644
index 0000000..fa96144
--- /dev/null
+++ b/xt/perlcriticrc
@@ -0,0 +1,2 @@
+[TestingAndDebugging::ProhibitNoStrict]
+allow=refs