diff options
-rw-r--r-- | lib/Games/Word.pm | 19 | ||||
-rw-r--r-- | lib/Games/Word/Wordlist.pm | 4 |
2 files changed, 9 insertions, 14 deletions
diff --git a/lib/Games/Word.pm b/lib/Games/Word.pm index 8f815fc..479d06d 100644 --- a/lib/Games/Word.pm +++ b/lib/Games/Word.pm @@ -1,15 +1,13 @@ -#!perl package Games::Word; -require Exporter; -@ISA = qw/Exporter/; -@EXPORT_OK = qw/random_permutation is_permutation all_permutations - shared_letters shared_letters_by_position - random_string_from - is_substring all_substrings - is_subpermutation all_subpermutations/; - use strict; use warnings; +use base 'Exporter'; +our @EXPORT_OK = qw/random_permutation is_permutation all_permutations + shared_letters shared_letters_by_position + random_string_from + is_substring all_substrings + is_subpermutation all_subpermutations/; + use Math::Combinatorics qw/factorial/; use Test::Deep::NoTest; @@ -300,7 +298,7 @@ L<http://search.cpan.org/dist/Games-Word> =head1 COPYRIGHT AND LICENSE -Copyright 2008 Jesse Luehrs. +Copyright 2008-2009 Jesse Luehrs. This program is free software; you can redistribute it and/or modify it under the same terms as Perl itself. @@ -308,4 +306,3 @@ under the same terms as Perl itself. =cut 1; - diff --git a/lib/Games/Word/Wordlist.pm b/lib/Games/Word/Wordlist.pm index 3a33044..9245442 100644 --- a/lib/Games/Word/Wordlist.pm +++ b/lib/Games/Word/Wordlist.pm @@ -1,4 +1,3 @@ -#!perl package Games::Word::Wordlist; use strict; use warnings; @@ -376,7 +375,7 @@ L<http://search.cpan.org/dist/Games-Word> =head1 COPYRIGHT AND LICENSE -Copyright 2008 Jesse Luehrs. +Copyright 2008-2009 Jesse Luehrs. This program is free software; you can redistribute it and/or modify it under the same terms as Perl itself. @@ -384,4 +383,3 @@ under the same terms as Perl itself. =cut 1; - |