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?