priyaviswam has asked for the wisdom of the Perl Monks concerning the following question:

Hi All, I have tried converting the jpg file to tif file. This tiff file is not recognised by the microsoft office picture manager. This is the code I have tried

my $dir = "C:\\Users\\rgopikrx\\Desktop\\im"; opendir (DIR, $dir) or die $!; my @directory = readdir(DIR) or die "unable to read $dir : $!"; my $index = 1; foreach my $file (@directory){ my $im = Image::Magick->new(); my $rc; my $dc; my $new = "$index".".tif"; next if ($file eq "."); next if ($file eq ".."); next if ($file eq "tt"); print "Files : $file\n"; print "Tif file : $new\n"; $rc = $im->Read("$dir\\$file");die $rc if $rc; $dc = $im->Write(filename=>"$dir\\$new"); $index++; }
is there anyother way to convert the jpg to tiff which will be recognized by the microsoft office picture manager so that I can use that image to OCR?

Replies are listed 'Best First'.
Re: convert jpg to tiff file
by marto (Cardinal) on Oct 31, 2011 at 12:09 UTC

    Office picture manager doesn't support all forms of TIFF compression. If your goal is to OCR images consider using Image::OCR::Tesseract.

      But this Tesseract is not supported on windows machine right?