Skip to content
Browse files

first commit

  • Loading branch information...
0 parents commit a6769cde9b0859ac3dd5fabafef629fbad1a27df Craftworks committed Sep 6, 2009
Showing with 167 additions and 0 deletions.
  1. +14 −0 .gitignore
  2. +5 −0 Changes
  3. +17 −0 Makefile.PL
  4. +31 −0 README
  5. +57 −0 lib/Test/ttserver.pm
  6. +5 −0 t/01-load_all.t
  7. +12 −0 t/02-pod.t
  8. +18 −0 t/03-pod-coverage.t
  9. +8 −0 t/x97-dependencies.t
14 .gitignore
@@ -0,0 +1,14 @@
+*.sw?
+blib*
+inc
+MANIFEST*
+Makefile
+Makefile.old
+Build
+_build*
+pm_to_blib*
+*.tar.gz
+.lwpcookies
+cover_db
+Test-ttserver-*
+META.yml
5 Changes
@@ -0,0 +1,5 @@
+Revision history for Test-ttserver
+
+0.001 Date/time
+ First version, released on an unsuspecting world.
+
17 Makefile.PL
@@ -0,0 +1,17 @@
+use inc::Module::Install;
+
+name 'Test-ttserver';
+all_from 'lib/Test/ttserver.pm';
+author q{Craftworks <craftwork at cpan org>};
+license 'perl';
+
+requires('version');
+
+build_requires('Test::More');
+build_requires('Test::UseAllModules');
+
+author_tests 'xt';
+
+auto_install;
+
+WriteAll;
31 README
@@ -0,0 +1,31 @@
+Test-ttserver
+=============
+
+The README is used to introduce the module and provide instructions on
+how to install the module, any machine dependencies it may have (for
+example C compilers and installed libraries) and any other information
+that should be provided before the module is installed.
+
+A README file is required for CPAN modules since CPAN extracts the README
+file from a module distribution so that people browsing the archive
+can use it get an idea of the modules uses. It is usually a good idea
+to provide version information here so that people can decide whether
+fixes for the module are worth downloading.
+
+INSTALLATION
+
+To install this module, run the following commands:
+
+ perl Makefile.PL
+ make
+ make test
+ make install
+
+COPYRIGHT AND LICENCE
+
+Put the correct copyright and licence information here.
+
+Copyright (C) 2009 Craftworks
+
+This library is free software; you can redistribute it and/or modify
+it under the same terms as Perl itself.
57 lib/Test/ttserver.pm
@@ -0,0 +1,57 @@
+package Test::ttserver;
+
+use warnings;
+use strict;
+use version;
+
+our $VERSION = version->new('0.001_01');
+
+=head1 NAME
+
+Test::ttserver - The fantastic new Test::ttserver!
+
+=head1 SYNOPSIS
+
+Quick summary of what the module does.
+
+Perhaps a little code snippet.
+
+ use Test::ttserver;
+
+ my $foo = Test::ttserver->new;
+ ...
+
+=head1 DESCRIPTION
+
+The fantastic new Test::ttserver!
+
+=head1 EXPORTS
+
+A list of functions that can be exported. You can delete this section
+if you don't export anything, such as for a purely object-oriented module.
+
+=head1 METHODS
+
+=head2 method1
+
+=head1 AUTHOR
+
+Craftworks, C<< <craftwork at cpan org> >>
+
+=head1 BUGS
+
+Please report any bugs or feature requests to
+C<bug-test-ttserver@rt.cpan.org>, or through the web interface at
+L<http://rt.cpan.org>. I will be notified, and then you'll automatically be
+notified of progress on your bug as I make changes.
+
+=head1 COPYRIGHT & LICENSE
+
+Copyright 2009 Craftworks, All Rights Reserved.
+
+This program is free software; you can redistribute it and/or modify it
+under the same terms as Perl itself.
+
+=cut
+
+1; # End of Test::ttserver
5 t/01-load_all.t
@@ -0,0 +1,5 @@
+use strict;
+use warnings;
+use Test::UseAllModules under => qw(lib t/lib);
+
+all_uses_ok();
12 t/02-pod.t
@@ -0,0 +1,12 @@
+#!perl -T
+
+use strict;
+use warnings;
+use Test::More;
+
+# Ensure a recent version of Test::Pod
+my $min_tp = 1.22;
+eval "use Test::Pod $min_tp";
+plan skip_all => "Test::Pod $min_tp required for testing POD" if $@;
+
+all_pod_files_ok();
18 t/03-pod-coverage.t
@@ -0,0 +1,18 @@
+use strict;
+use warnings;
+use Test::More;
+
+# Ensure a recent version of Test::Pod::Coverage
+my $min_tpc = 1.08;
+eval "use Test::Pod::Coverage $min_tpc";
+plan skip_all => "Test::Pod::Coverage $min_tpc required for testing POD coverage"
+ if $@;
+
+# Test::Pod::Coverage doesn't require a minimum Pod::Coverage version,
+# but older versions don't recognize some common documentation styles
+my $min_pc = 0.18;
+eval "use Pod::Coverage $min_pc";
+plan skip_all => "Pod::Coverage $min_pc required for testing POD coverage"
+ if $@;
+
+all_pod_coverage_ok();
8 t/x97-dependencies.t
@@ -0,0 +1,8 @@
+use strict;
+use warnings;
+use ExtUtils::MakeMaker;
+use Test::Dependencies
+ exclude => [qw/Test::Dependencies Test::ttserver/],
+ style => 'light';
+
+ok_dependencies();

0 comments on commit a6769cd

Please sign in to comment.
Something went wrong with that request. Please try again.