the CPAN module Tk::TIFF - read and write tiff images in Perl/Tk