Beefy Boxes and Bandwidth Generously Provided by pair Networks
good chemistry is complicated,
and a little bit messy -LW

convert jpg to tiff file

by priyaviswam (Sexton)
on Oct 31, 2011 at 11:53 UTC ( #934867=perlquestion: print w/replies, xml ) Need Help??
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 (Archbishop) 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?

Log In?

What's my password?
Create A New User
Node Status?
node history
Node Type: perlquestion [id://934867]
Approved by marto
and all is quiet...

How do I use this? | Other CB clients
Other Users?
Others meditating upon the Monastery: (6)
As of 2018-06-18 07:53 GMT
Find Nodes?
    Voting Booth?
    Should cpanminus be part of the standard Perl release?

    Results (109 votes). Check out past polls.