Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with HTTPS or Subversion.

Download ZIP
Browse files

initial commit

  • Loading branch information...
commit 103b60d80fd646034de63c310baf1fa790cbc722 0 parents
@xaicron authored
20 .gitignore
@@ -0,0 +1,20 @@
+cover_db
+MYMETA.*
+META.yml
+Makefile
+blib
+inc
+pm_to_blib
+MANIFEST
+MANIFEST.bak
+Makefile.old
+nytprof*
+ppport.h
+xs/*c
+xs/*o
+xs/*obj
+*.bs
+*.def
+*.old
+dll*
+*~
2  .shipit
@@ -0,0 +1,2 @@
+steps = FindVersion, ChangeVersion, CheckChangeLog, DistTest, Commit, Tag, MakeDist, UploadCPAN
+git.push_to = origin
4 Changes
@@ -0,0 +1,4 @@
+Revision history for Perl extension WWW::Google::C2DM
+
+0.01 Mon Dec 26 22:13:21 2011
+ - original version
16 MANIFEST.SKIP
@@ -0,0 +1,16 @@
+\bRCS\b
+\bCVS\b
+\.svn/
+\.git/
+^MANIFEST\.
+^Makefile$
+~$
+\.old$
+^blib/
+^pm_to_blib
+^MakeMaker-\d
+\.gz$
+\.shipit
+\.gitignore
+\ppport.h
+^MYMETA\.
17 Makefile.PL
@@ -0,0 +1,17 @@
+use inc::Module::Install;
+use Module::Install::AuthorTests;
+
+name 'WWW-Google-C2DM';
+all_from 'lib/WWW/Google/C2DM.pm';
+
+#requires '';
+
+test_requires 'Test::More', 0.98;
+
+tests join q{ }, map { sprintf 't%s.t', '/*' x $_ } 1..3;
+author_tests 'xt';
+
+repository 'http://github.com/xaicron/p5-WWW-Google-C2DM/';
+bugtracker 'http://github.com/xaicron/p5-WWW-Google-C2DM/issues';
+
+WriteAll;
30 README
@@ -0,0 +1,30 @@
+This is Perl module WWW::Google::C2DM.
+
+INSTALLATION
+
+WWW::Google::C2DM installation is straightforward. If your CPAN shell is set up,
+you should just be able to do
+
+ % cpan WWW::Google::C2DM
+or
+
+ % cpanm WWW::Google::C2DM
+
+Download it, unpack it, then build it as per the usual:
+
+ % perl Makefile.PL
+ % make && make test
+
+Then install it:
+
+ % make install
+
+DOCUMENTATION
+
+WWW::Google::C2DM documentation is available as in POD. So you can do:
+
+ % perldoc WWW::Google::C2DM
+
+to read the documentation online with your favorite pager.
+
+xaicron
42 lib/WWW/Google/C2DM.pm
@@ -0,0 +1,42 @@
+package WWW::Google::C2DM;
+
+use strict;
+use warnings;
+use 5.008_001;
+our $VERSION = '0.01';
+
+1;
+__END__
+
+=encoding utf-8
+
+=for stopwords
+
+=head1 NAME
+
+WWW::Google::C2DM -
+
+=head1 SYNOPSIS
+
+ use WWW::Google::C2DM;
+
+=head1 DESCRIPTION
+
+WWW::Google::C2DM is
+
+=head1 AUTHOR
+
+xaicron E<lt>xaicron@cpan.orgE<gt>
+
+=head1 COPYRIGHT
+
+Copyright 2011 - xaicron
+
+=head1 LICENSE
+
+This library is free software; you can redistribute it and/or modify
+it under the same terms as Perl itself.
+
+=head1 SEE ALSO
+
+=cut
5 t/00_compile.t
@@ -0,0 +1,5 @@
+use strict;
+use warnings;
+use Test::More tests => 1;
+
+BEGIN { use_ok 'WWW::Google::C2DM' }
37 xt/01_podspell.t
@@ -0,0 +1,37 @@
+use strict;
+use warnings;
+use Test::More;
+use Test::Requires 'Test::Spelling';
+use Config;
+use File::Spec;
+use ExtUtils::MakeMaker;
+
+my %cmd_map = (
+ spell => 'spell',
+ aspell => 'aspell list -l en',
+ ispell => 'ispell -l',
+ hunspell => 'hunspell -d en_US -l',
+);
+
+my $spell_cmd;
+for my $dir ((split /$Config::Config{path_sep}/, $ENV{PATH}), '.') {
+ next if $dir eq '';
+ ($spell_cmd) = map { $cmd_map{$_} } grep {
+ my $abs = File::Spec->catfile($dir, $_);
+ -x $abs or MM->maybe_command($abs);
+ } keys %cmd_map;
+ last if $spell_cmd;
+}
+$spell_cmd = $ENV{SPELL_CMD} if $ENV{SPELL_CMD};
+plan skip_all => "spell command are not available." unless $spell_cmd;
+add_stopwords(map { split /[\s\:\-]/ } <DATA>);
+set_spell_cmd($spell_cmd);
+$ENV{LANG} = 'C';
+all_pod_files_spelling_ok('lib');
+
+__DATA__
+WWW::Google::C2DM
+
+# personal section
+xaicron
+xaicron@cpan.org
6 xt/02_pod.t
@@ -0,0 +1,6 @@
+use strict;
+use warnings;
+use Test::More;
+use Test::Requires { 'Test::Pod' => 1.00 };
+
+all_pod_files_ok();
11 xt/03_pod-coverage.t
@@ -0,0 +1,11 @@
+use strict;
+use warnings;
+use Test::More;
+use Test::Requires { 'Test::Pod::Coverage' => 1.04 };
+
+unless ($ENV{TEST_POD_COVERAGE}) {
+ plan skip_all => "\$ENV{TEST_POD_COVERAGE} is not set.";
+ exit;
+}
+
+all_pod_coverage_ok({also_private => [qw(unimport BUILD DEMOLISH)]});
8 xt/04_perlcritic.t
@@ -0,0 +1,8 @@
+use strict;
+use warnings;
+use Test::More;
+use Test::Requires { 'Test::Perl::Critic' => 1.02 };
+
+Test::Perl::Critic->import(-profile => 'xt/perlcriticrc');
+
+all_critic_ok('lib');
19 xt/05_script-shebang.t
@@ -0,0 +1,19 @@
+use strict;
+use warnings;
+use Test::More;
+use Test::Requires 'Test::Script::Shebang';
+use File::Find qw/find/;
+
+my @files;
+for my $dir (qw/bin script/) {
+ next unless -d $dir;
+ find {
+ no_chdir => 1,
+ wanted => sub { push @files, $_ if -f },
+ }, $dir;
+}
+plan skip_all => 'script not found' unless @files;
+
+check_shebang(@files);
+
+done_testing;
3  xt/perlcriticrc
@@ -0,0 +1,3 @@
+[TestingAndDebugging::ProhibitNoStrict]
+allow=refs
+[-Subroutines::ProhibitSubroutinePrototypes]
Please sign in to comment.
Something went wrong with that request. Please try again.