diff --git a/perl/Changes b/perl/Changes
index dd47b988..41203763 100644
--- a/perl/Changes
+++ b/perl/Changes
@@ -1,10 +1,15 @@
+0.23
+
+    (NO FEATURE CHANGES)
+    - fixed english docs(hanekomu++)
+
 0.22
 
     - fixed issue on ithreads(broken from 0.21)
 
 0.21
 
-    - doc enhancment
+    - doc enhancments
     - micro performance tuning.
 
 0.20
diff --git a/perl/README b/perl/README
index dec61252..e46323da 100644
--- a/perl/README
+++ b/perl/README
@@ -22,35 +22,37 @@ ABOUT MESSAGEPACK FORMAT
             say length(Storable::nfreeze({a=>1, b=>2}));       # => 21
             say length(Data::MessagePack->pack({a=>1, b=>2})); # => 7
 
-        MessagePack format saves memory than JSON and Storable format.
+        The MessagePack format saves memory than JSON and Storable format.
 
     STREAMING DESERIALIZER
         MessagePack supports streaming deserializer. It is useful for
         networking such as RPC.
 
-    If you want to get more informations about messagepack format, please
+    If you want to get more information about the MessagePack format, please
     visit to <http://msgpack.org/>.
 
 METHODS
     my $packed = Data::MessagePack->pack($data[, $max_depth]);
         Pack the $data to messagepack format string.
 
-        This method throws exception when nesting perl structure more than
-        $max_depth(default: 512) for detecting circular reference.
+        This method throws an exception when the perl structure is nested
+        more than $max_depth levels(default: 512) in order to detect
+        circular references.
 
-        Data::MessagePack->pack() throws exception when encountered blessed
-        object. Because MessagePack is language independent format.
+        Data::MessagePack->pack() throws an exception when encountering
+        blessed object, because MessagePack is language-independent format.
 
     my $unpacked = Data::MessagePack->unpack($msgpackstr);
-        unpack the $msgpackstr to messagepack format string.
+        unpack the $msgpackstr to a MessagePack format string.
 
 Configuration Variables
     $Data::MessagePack::PreferInteger
         Pack the string as int when the value looks like int(EXPERIMENTAL).
 
 SPEED
-    This is result of benchmark/serialize.pl and benchmark/deserialize.pl on
-    my SC440(Linux 2.6.32-23-server #37-Ubuntu SMP).
+    This is the result of benchmark/serialize.pl and
+    benchmark/deserialize.pl on my SC440(Linux 2.6.32-23-server #37-Ubuntu
+    SMP).
 
         -- serialize
         JSON::XS: 2.3
@@ -82,6 +84,8 @@ THANKS TO
 
     FURUHASHI Sadayuki
 
+    hanekomu
+
 LICENSE
     This library is free software; you can redistribute it and/or modify it
     under the same terms as Perl itself.
diff --git a/perl/lib/Data/MessagePack.pm b/perl/lib/Data/MessagePack.pm
index 516e98b2..3511628c 100644
--- a/perl/lib/Data/MessagePack.pm
+++ b/perl/lib/Data/MessagePack.pm
@@ -3,7 +3,7 @@ use strict;
 use warnings;
 use 5.008001;
 
-our $VERSION = '0.22';
+our $VERSION = '0.23';
 our $PreferInteger = 0;
 
 our $true  = do { bless \(my $dummy = 1), "Data::MessagePack::Boolean" };
@@ -60,7 +60,7 @@ Messagepack is language independent binary serialize format.
     say length(Storable::nfreeze({a=>1, b=>2}));       # => 21
     say length(Data::MessagePack->pack({a=>1, b=>2})); # => 7
 
-MessagePack format saves memory than JSON and Storable format.
+The MessagePack format saves memory than JSON and Storable format.
 
 =item STREAMING DESERIALIZER
 
@@ -68,7 +68,7 @@ MessagePack supports streaming deserializer. It is useful for networking such as
 
 =back
 
-If you want to get more informations about messagepack format, please visit to L<http://msgpack.org/>.
+If you want to get more information about the MessagePack format, please visit to L<http://msgpack.org/>.
 
 =head1 METHODS
 
@@ -78,13 +78,13 @@ If you want to get more informations about messagepack format, please visit to L
 
 Pack the $data to messagepack format string.
 
-This method throws exception when nesting perl structure more than $max_depth(default: 512) for detecting circular reference.
+This method throws an exception when the perl structure is nested more than $max_depth levels(default: 512) in order to detect circular references.
 
-Data::MessagePack->pack() throws exception when encountered blessed object. Because MessagePack is language independent format.
+Data::MessagePack->pack() throws an exception when encountering blessed object, because MessagePack is language-independent format.
 
 =item my $unpacked = Data::MessagePack->unpack($msgpackstr);
 
-unpack the $msgpackstr to messagepack format string.
+unpack the $msgpackstr to a MessagePack format string.
 
 =back
 
@@ -100,7 +100,7 @@ Pack the string as int when the value looks like int(EXPERIMENTAL).
 
 =head1 SPEED
 
-This is result of benchmark/serialize.pl and benchmark/deserialize.pl on my SC440(Linux 2.6.32-23-server #37-Ubuntu SMP).
+This is the result of benchmark/serialize.pl and benchmark/deserialize.pl on my SC440(Linux 2.6.32-23-server #37-Ubuntu SMP).
 
     -- serialize
     JSON::XS: 2.3
@@ -134,6 +134,8 @@ Dan Kogai
 
 FURUHASHI Sadayuki
 
+hanekomu
+
 =head1 LICENSE
 
 This library is free software; you can redistribute it and/or modify
diff --git a/perl/lib/Data/MessagePack/Unpacker.pod b/perl/lib/Data/MessagePack/Unpacker.pod
index c24eaf1d..2bc4549c 100644
--- a/perl/lib/Data/MessagePack/Unpacker.pod
+++ b/perl/lib/Data/MessagePack/Unpacker.pod
@@ -14,7 +14,7 @@ Data::MessagePack::Unpacker - messagepack streaming deserializer
 
 =head1 DESCRIPTION
 
-This is an streaming deserializer for messagepack.
+This is a streaming deserializer for messagepack.
 
 =head1 METHODS
 
@@ -22,7 +22,7 @@ This is an streaming deserializer for messagepack.
 
 =item my $up = Data::MessagePack::Unpacker->new()
 
-create new instance of stream deserializer.
+creates a new instance of stream deserializer.
 
 =item my $ret = $up->execute($data, $offset);
 
@@ -39,11 +39,11 @@ is this deserializer finished?
 
 =item my $data = $up->data();
 
-returns deserialized object.
+returns the deserialized object.
 
 =item $up->reset();
 
-reset the stream deserializer, without memory zone.
+resets the stream deserializer, without memory zone.
 
 =back