Changeset 25947

Timestamp:

12/05/08 16:02:30 (4 years ago)

Author:

ktat

Message:

Checking in changes prior to tagging of version 0.03. Changelog diff is:

=== Changes
==================================================================
--- Changes (revision 30147)
+++ Changes (local)
@@ -1,5 +1,11 @@

Revision history for Util-Any

+0.03 2008/12/05 15:37
+ add debug option
+ write document in detail
+ fix for Perl 5.10.
+ Perl 5.10 Hash::Util doesn't have some functions which are defined in EXPORT_OK.
+

0.02 2008/12/03 14:52

class variables should be cloned in sub class,
so change %Utils variables from hash to hash ref to clone easily.

Location:

lang/perl/Util-Any/trunk

Files:

• Changes (modified) (1 diff)
• MANIFEST (modified) (1 diff)
• lib/Util/Any.pm (modified) (10 diffs)
• t/03-debug.t (added)

lang/perl/Util-Any/trunk/Changes

@@ -1 +1 @@
 Revision history for Util-Any
+
+0.03    2008/12/05 15:37
+        add debug option
+        write document in detail
+        fix for Perl 5.10.
+        Perl 5.10 Hash::Util doesn't have some functions which are defined in EXPORT_OK.
 
 0.02    2008/12/03 14:52

lang/perl/Util-Any/trunk/MANIFEST

@@ -18 +18 @@
 t/02-util-func-scalar-prefix.t
 t/01-util-kind-all-prefix.t
+t/03-debug.t
 t/lib/MyUtil.pm

lang/perl/Util-Any/trunk/lib/Util/Any.pm

@@ -6 +6 @@
 use strict;
 
-our $DEBUG = 0;
 our $Utils = {
               list   => [ qw/List::Util List::MoreUtils/ ],
@@ -200 +199 @@
 =head1 EXPORT
 
-The following is kinds of functions and list of exported functions.
+Kinds of functions and list of exported functions are below.
+Note that these modules and version are in my environment(Perl 5.8.4).
+So, it must be diffrent in your environment.
 
 =head2 scalar
 
-from Scalar::Util
+from Scalar::Util (1.19)
 
  blessed
@@ -221 +222 @@
 =head2 hash
 
-from Hash::Util
+from Hash::Util (0.05)
 
  hash_seed
@@ -233 +234 @@
 =head2 list
 
-from List::Util
+from List::Util (1.19)
 
  first
@@ -244 +245 @@
  sum
 
-from List::MoreUtils
+from List::MoreUtils (0.21)
 
  after
@@ -280 +281 @@
 =head2 string
 
-from String::Util
+from String::Util (0.11)
 
  crunch
@@ -295 +296 @@
  unquote
 
-from String::CamelCase
+from String::CamelCase (0.01)
 
  camelize
@@ -303 +304 @@
 =head2 debug
 
-from Data::Dumper
+from Data::Dumper (2.121)
 
  Dumper
@@ -329 +330 @@
  use Util::Yours qw/list/;
 
-=head2 $Utils DEFINITION RULE
+=head2 $Utils STRUCTURE
 
 Key must be lower character.
@@ -344 +345 @@
 
  $Utils = { list => ['List::Utils'] };
- $Utils = { list => [['List::Utils', 'lu_']] };
+ $Utils = { list => [['List::Utils', 'prefix_']] };
+
+see L<PREFIX FOR EACH MODULE>
 
 =head1 PREFIX FOR EACH MODULE