--- Lingua-EN-Tagger-0.23/Makefile.PL	2012-05-28 16:24:29.000000000 +0300

+++ Lingua-EN-Tagger-0.23/Makefile.PL	2012-10-03 21:47:47.000000000 +0300

@@ -44,8 +44,8 @@

                 _load_tags( File::Spec->catfile( $lex_dir, 'tags.yml' ) );

                 _load_words( File::Spec->catfile( $lex_dir, 'words.yml' ) );

                 _load_words( File::Spec->catfile( $lex_dir, 'unknown.yml' ) );

-                store \%_LEXICON, $word_path;

-                store \%_HMM, $tag_path;

+		Storable::nstore \%_LEXICON, $word_path;

+		Storable::nstore \%_HMM, $tag_path;

         }

         if( -f $word_path and -f $tag_path ){

--- Lingua-EN-Tagger-0.23/Tagger.pm	2012-10-01 17:47:22.000000000 +0300

+++ Lingua-EN-Tagger-0.23/Tagger.pm	2012-10-03 21:48:53.000000000 +0300

@@ -854,8 +854,8 @@

     $self->_load_tags($self->{'tag_lex'});

     $self->_load_words($self->{'word_lex'});

     $self->_load_words($self->{'unknown_lex'});

-    store \%_LEXICON, $self->{'word_path'};

-    store \%_HMM, $self->{'tag_path'};

+    Storable::nstore \%_LEXICON, $self->{'word_path'};

+    Storable::nstore \%_HMM, $self->{'tag_path'};

 }