Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Скриптовые языки программирования > Perl
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 06.08.2018, 09:34   #1
mirvam
Форумчанин
 
Регистрация: 03.08.2018
Сообщений: 129
По умолчанию OCR Tesseract

Вот мой код для расшифровки текста с картинки:
use Image::OCR::Tesseract 'get_ocr';

$image = $ua->get($url);
$code = get_ocr($image);
print $code;

Вывод программы:
Can't locate Image/OCR/Tesseract.pm in @INC (you may need to install the Image::OCR::Tesseract module) (@INC contains: C:/Programs/Perl/perl/site/lib C:/Programs/Perl/perl/vendor/lib C:/Programs/Perl/perl/lib) at task.pl line 4.
BEGIN failed--compilation aborted at task.pl line 4.

Подскажите пожалуйста, как мне установить Image::OCR::Tesseract module (если это необходимо) и как мне во 2 строке правильно написать
$code = get_ocr($image);
$code = get_ocr($image->decoded_content);

Последний раз редактировалось mirvam; 06.08.2018 в 16:48.
mirvam вне форума Ответить с цитированием
Старый 06.08.2018, 10:08   #2
p51x
Старожил
 
Регистрация: 15.02.2010
Сообщений: 15,694
По умолчанию

Цитата:
Сообщение от mirvam Посмотреть сообщение
Подскажите пожалуйста, как мне установить Image::OCR::Tesseract module (если это необходимо)
ppm install Image-OCR-Tesseract
p51x вне форума Ответить с цитированием
Старый 06.08.2018, 10:52   #3
mirvam
Форумчанин
 
Регистрация: 03.08.2018
Сообщений: 129
По умолчанию

Прописал в консоли. Вывод:
Error installing package 'Image-OCR-Tesseract': Could not locate a PPD file for package Image-OCR-Tesseract
mirvam вне форума Ответить с цитированием
Старый 06.08.2018, 11:03   #4
p51x
Старожил
 
Регистрация: 15.02.2010
Сообщений: 15,694
По умолчанию

Почитайте https://stackoverflow.com/questions/...ule-on-windows
p51x вне форума Ответить с цитированием
Старый 06.08.2018, 11:15   #5
mirvam
Форумчанин
 
Регистрация: 03.08.2018
Сообщений: 129
По умолчанию

make install" routine requires an edit to the Makefile.pl script, including the missing Windows install module (Devel::AssertOS::MSWin32)
Я прописал в своем коде: use Devel :: AssertOS :: MSWin32;
А дальше мое понимание закончилось.
mirvam вне форума Ответить с цитированием
Старый 06.08.2018, 16:57   #6
mirvam
Форумчанин
 
Регистрация: 03.08.2018
Сообщений: 129
По умолчанию

Запускаю код типа:
Код:
$url = "http://website.com/path/picture.png";
$image = $ua->get($url);
$code = get_ocr($image);
print $code;
Вывод программы:
Изображения
Тип файла: png output.png (2.2 Кб, 71 просмотров)

Последний раз редактировалось mirvam; 06.08.2018 в 22:02.
mirvam вне форума Ответить с цитированием
Старый 07.08.2018, 07:39   #7
mirvam
Форумчанин
 
Регистрация: 03.08.2018
Сообщений: 129
По умолчанию

Можете подсказать, работа в Linux, если в каталоге, в котором файл Perl есть архив Image-OCR-Tesseract-1.24.tar.gz , то его распаковывать не нужно? Это правильное размещение архива?
mirvam вне форума Ответить с цитированием
Старый 07.08.2018, 07:44   #8
p51x
Старожил
 
Регистрация: 15.02.2010
Сообщений: 15,694
По умолчанию

Нужно. И устанавливать нужно.
p51x вне форума Ответить с цитированием
Старый 07.08.2018, 09:33   #9
mirvam
Форумчанин
 
Регистрация: 03.08.2018
Сообщений: 129
По умолчанию

устанавливали
cpanm Image::OCR::Tesseract module
cpanm --local-lib=~/perl5 Image-OCR-Tesseract-1.24.tar.gz
В каталоге лежит этот архив. При компиляции приложения, все еще вываливается прежняя ошибка: Can't locate Image/OCR/Tesseract.pm
Нужно распаковать архив? В текущем каталоге?

Последний раз редактировалось mirvam; 07.08.2018 в 09:51.
mirvam вне форума Ответить с цитированием
Старый 07.08.2018, 12:03   #10
p51x
Старожил
 
Регистрация: 15.02.2010
Сообщений: 15,694
По умолчанию

Приведите вывод команды install у cpan для модуля. Ну или распакуйте архив и сделайте, как написано в доке:
Цитата:
perl Makefile.PL
make test
make install
make realclean
p51x вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Ошибка delete[] Basic example tesseract-ocr Boltina Общие вопросы C/C++ 1 29.11.2015 22:30
Tesseract, изменить путь к tessdata Xenon_x Общие вопросы C/C++ 6 26.07.2015 11:41
Распознавание используя tesseract-ocr cardon Win Api 2 05.11.2012 18:38
OCR delphi Maincore Общие вопросы Delphi 0 10.02.2012 13:38
Ocr в Delphi waterya Общие вопросы Delphi 1 19.06.2010 17:41