Bug 72026

	When using 'use MIME::Parser' in perl script faild with message:
---- START ERROR
	Can't locate object method "SWASHNEW" via package "utf8" (perhaps you forgot to load "utf8"?) at /usr/local/lib/perl5/site_perl/5.6.1/MIME/Parser/Filer.pm line 363.
Compilation failed in require at /usr/local/lib/perl5/site_perl/5.6.1/MIME/Parser.pm line 152.
BEGIN failed--compilation aborted at /usr/local/lib/perl5/site_perl/5.6.1/MIME/Parser.pm line 152.
----- END ERROR

Fix: 

use strict;
+use utf8;

 ### Kit modules:
 use MIME::Tools qw(:msgtypes);--tFtADzefrOLOGYP6S6birUwM0PfgUOc79M4H4B0AdiymP03n
Content-Type: text/plain; name="file.diff"
Content-Transfer-Encoding: 7bit
Content-Disposition: attachment; filename="file.diff"

--- /usr/local/lib/perl5/site_perl/5.6.1/MIME/Parser/Filer.pm.orig      Thu Sep 23 10:57:35 2004
+++ /usr/local/lib/perl5/site_perl/5.6.1/MIME/Parser/Filer.pm   Thu Sep 23 10:57:22 2004
@@ -127,6 +127,7 @@
 =cut
How-To-Repeat: 	Start perl script like this:

	#!/usr/bin/perl
	use MIME::Parser;