diff -up Locale-US-1.2/US.pm.orig Locale-US-1.2/US.pm
--- Locale-US-1.2/US.pm.orig	2007-07-17 01:06:51.000000000 +0200
+++ Locale-US-1.2/US.pm	2011-01-27 06:19:26.000000000 +0100
@@ -36,6 +36,7 @@ sub new {
     
     my $class = shift;
     my $self = {} ;
+    my $start_pos = tell( DATA );
 
     while ( <DATA>) {
 	chomp;
@@ -46,6 +47,8 @@ sub new {
 	$self->{state2code}{$state} = $code;
     }
 
+    seek( DATA, $start_pos, 0 );
+
 #    warn Dumper $self;
     bless $self, $class;
 }