--- /usr/local/lib/perl5/site_perl/5.10.1/mach/Crypt/DES.pm	2011-03-07 15:14:04.000000000 +0100
+++ /usr/local/lib/perl5/site_perl/5.10.1/mach/Crypt/DES.pm.orig	2011-03-07 15:13:39.000000000 +0100
@@ -10,7 +10,6 @@
 require Exporter;
 require DynaLoader;
 use vars qw($VERSION @ISA @EXPORT @EXPORT_OK);
-use utf8;
 
 @ISA = qw(Exporter DynaLoader);
 
@@ -55,7 +54,6 @@
 	usage("encrypt data[8 bytes]") unless @_ == 2;
 
 	my ($self,$data) = @_;
-	utf8::downgrade($data);
 	return Crypt::DES::crypt($data, $data, $self->{'ks'}, 1);
 }
 
@@ -64,7 +62,6 @@
 	usage("decrypt data[8 bytes]") unless @_ == 2;
 
 	my ($self,$data) = @_;
-	utf8::downgrade($data);
 	return Crypt::DES::crypt($data, $data, $self->{'ks'}, 0);
 }