OCR for SHOTNOTE

IT IS BUGGY. NO WARRANTY.

This page describes a personal tool for SHOTNOTE. Following programs read JPEG file and recognize NO and DATE in the image.

Currently, I develop and run this on CentOS 6.4 . But this program can run on other platforms because the program is made by perl script.

Source codes:

first version(20130417): ocr-shotnote-draft.pl.
It is a one day work. Do not expect lots. Precision is 73-90% (approx.) per charactor. It is too low to recognize string (10 chars). The program requires PerlMagick, perl API for ImageMagick. (See also How to check modules)
20130422: cui.pl + _ocr-shotnote3.pl , or xgui.pl (it requires Tk) + _ocr-shotnote3.pl. _ocr-shotnote3.pl has common precedures.

Following image is a snapshot of xgui.pl.

Miss recognized letter is expressed @ (at) like following.

How to Check Existance of Perl Modules

PerlMagick

If you have PerlMagick, perl prints no error for use.

% perl -e 'use Image::Magick' %

Otherwise, perl prints error messages.

% perl -e 'use Image::Magick' Can't locate Image/Magick.pm in @INC (@INC contains: /home/k-chinen/lib/perl /usr/perl5/5.8.4/lib/i86pc-solaris-64int /usr/perl5/5.8.4/lib /usr/perl5/site_perl/5.8.4/i86pc-solaris-64int /usr/perl5/site_perl/5.8.4 /usr/perl5/site_perl /usr/perl5/vendor_perl/5.8.4/i86pc-solaris-64int /usr/perl5/vendor_perl/5.8.4 /usr/perl5/vendor_perl .) at -e line 1. BEGIN failed--compilation aborted at -e line 1. %

Perl/Tk

If you have Tk, perl prints no error for use.

% perl -e 'use Tk' %

Otherwise, perl prints error messages.

% perl -e 'use Tk' Can't locate Tk.pm in @INC (@INC contains: /home/k-chinen/lib/perl /usr/perl5/5.8.4/lib/i86pc-solaris-64int /usr/perl5/5.8.4/lib /usr/perl5/site_perl/5.8.4/i86pc-solaris-64int /usr/perl5/site_perl/5.8.4 /usr/perl5/site_perl /usr/perl5/vendor_perl/5.8.4/i86pc-solaris-64int /usr/perl5/vendor_perl/5.8.4 /usr/perl5/vendor_perl .) at -e line 1. BEGIN failed--compilation aborted at -e line 1. %

2013/04/24