diff -urN Image-ExifTool-5.18.orig/lib/Image/ExifTool/IPTC.pm Image-ExifTool-5.18/lib/Image/ExifTool/IPTC.pm
--- Image-ExifTool-5.18.orig/lib/Image/ExifTool/IPTC.pm	2005-04-20 17:14:15 +0300
+++ Image-ExifTool-5.18/lib/Image/ExifTool/IPTC.pm	2005-05-18 14:41:39 +0300
@@ -10,7 +10,7 @@
 #------------------------------------------------------------------------------
 
 package Image::ExifTool::IPTC;
-
+use Image::ExifTool;
 use strict;
 use vars qw($VERSION $AUTOLOAD);
 
diff -urN Image-ExifTool-5.18.orig/lib/Image/ExifTool/WriteCanonRaw.pl Image-ExifTool-5.18/lib/Image/ExifTool/WriteCanonRaw.pl
--- Image-ExifTool-5.18.orig/lib/Image/ExifTool/WriteCanonRaw.pl	2005-04-20 17:06:16 +0300
+++ Image-ExifTool-5.18/lib/Image/ExifTool/WriteCanonRaw.pl	2005-05-18 14:36:47 +0300
@@ -6,7 +6,7 @@
 # Revisions:    01/25/2005 - P. Harvey Created
 #------------------------------------------------------------------------------
 package Image::ExifTool::CanonRaw;
-
+use Image::ExifTool::CanonRaw;
 use strict;
 use Image::ExifTool::Fixup;
 
diff -urN Image-ExifTool-5.18.orig/lib/Image/ExifTool/WriteExif.pl Image-ExifTool-5.18/lib/Image/ExifTool/WriteExif.pl
--- Image-ExifTool-5.18.orig/lib/Image/ExifTool/WriteExif.pl	2005-05-16 17:21:01 +0300
+++ Image-ExifTool-5.18/lib/Image/ExifTool/WriteExif.pl	2005-05-18 14:36:54 +0300
@@ -7,7 +7,7 @@
 #------------------------------------------------------------------------------
 
 package Image::ExifTool::Exif;
-
+use Image::ExifTool::Exif;
 use strict;
 
 use Image::ExifTool::Fixup;
diff -urN Image-ExifTool-5.18.orig/lib/Image/ExifTool/WriteIPTC.pl Image-ExifTool-5.18/lib/Image/ExifTool/WriteIPTC.pl
--- Image-ExifTool-5.18.orig/lib/Image/ExifTool/WriteIPTC.pl	2005-04-20 17:06:16 +0300
+++ Image-ExifTool-5.18/lib/Image/ExifTool/WriteIPTC.pl	2005-05-18 14:37:01 +0300
@@ -7,7 +7,7 @@
 #------------------------------------------------------------------------------
 
 package Image::ExifTool::IPTC;
-
+use Image::ExifTool::IPTC;
 use strict;
 
 # mandatory IPTC tags for each record
diff -urN Image-ExifTool-5.18.orig/lib/Image/ExifTool/WritePhotoshop.pl Image-ExifTool-5.18/lib/Image/ExifTool/WritePhotoshop.pl
--- Image-ExifTool-5.18.orig/lib/Image/ExifTool/WritePhotoshop.pl	2005-04-20 17:06:16 +0300
+++ Image-ExifTool-5.18/lib/Image/ExifTool/WritePhotoshop.pl	2005-05-18 14:37:08 +0300
@@ -7,7 +7,7 @@
 #------------------------------------------------------------------------------
 
 package Image::ExifTool::Photoshop;
-
+use Image::ExifTool::Photoshop;
 use strict;
 
 
diff -urN Image-ExifTool-5.18.orig/lib/Image/ExifTool/Writer.pl Image-ExifTool-5.18/lib/Image/ExifTool/Writer.pl
--- Image-ExifTool-5.18.orig/lib/Image/ExifTool/Writer.pl	2005-05-16 14:40:29 +0300
+++ Image-ExifTool-5.18/lib/Image/ExifTool/Writer.pl	2005-05-18 14:37:28 +0300
@@ -11,7 +11,7 @@
 #------------------------------------------------------------------------------
 
 package Image::ExifTool;
-
+use Image::ExifTool;
 use strict;
 
 use Image::ExifTool::TagLookup qw(FindTagInfo);
diff -urN Image-ExifTool-5.18.orig/lib/Image/ExifTool/WriteXMP.pl Image-ExifTool-5.18/lib/Image/ExifTool/WriteXMP.pl
--- Image-ExifTool-5.18.orig/lib/Image/ExifTool/WriteXMP.pl	2005-04-20 17:06:16 +0300
+++ Image-ExifTool-5.18/lib/Image/ExifTool/WriteXMP.pl	2005-05-18 14:37:16 +0300
@@ -26,7 +26,7 @@
 #   nil
 #
 package Image::ExifTool::XMP;
-
+use Image::ExifTool::XMP;
 use strict;
 
 sub CheckXMP($$$);