Re^4: Why the Create method keep failing using Office 2007 OCR API?

@Anonymous Monk, thanks a lot for the guidance. I tested the modified code with a MDI file that already has OCR information like so:

$miDoc->Create('OCR-test-result.mdi');
my $OCRresult = $miDoc->{Images}->Item(0)->{Layout}{Text};
print $OCRresult;
[download]

It outputs the expected result. But if I retain the OCR method like the original code did:

$miDoc->Create('OCR-test.tif');
$miDoc->OCR(LangId =>'miLANG_ENGLISH');
my $OCRresult = $miDoc->{Images}->Item(0)->{Layout}{Text};
print $OCRresult;
[download]

Perl throws me the same error message: Use of uninitialized value $OCRresult in print

So now it looks like there's also something wrong with this line:

 
$miDoc->OCR(LangId =>'miLANG_ENGLISH');
[download]

What diagnostic method can I use to solve the problem. The following code gives me nothing:

eval {$miDoc->OCR(LangId =>'miLANG_ENGLISH')}; 
warn $@ if $@;
[download]

Thanks again :)

Comment on Re^4: Why the Create method keep failing using Office 2007 OCR API? Select or Download Code

Replies are listed 'Best First'.
Re^5: Why the Create method keep failing using Office 2007 OCR API? by Anonymous Monk on Mar 02, 2010 at 04:31 UTC
`$miDoc->{Images}->Item(0)->{Layout}{Text};` [download] is four operations, and each and every one can fail `my $images = $miDoc->{Images} \|\| die $^E; my $first = $images->Item(0) \|\| die $^E; my $layout = $first->{Layout} \|\| die $^E; my $text = $layout->{Text} \|\| die $^E;` [download]	[reply] [d/l] [select]
Re^6: Why the Create method keep failing using Office 2007 OCR API? by ZJ.Mike.2009 (Scribe) on Mar 02, 2010 at 04:44 UTC
@Anonymous Monk, thanks again. If I were to load an MDI file that already has the OCRed result information, the script would output the OCRed text. Otherwise, it dies at the last step. For the above four operations, it dies at my $text line.	[reply]