|
ru.perl- RU.PERL ---------------------------------------------------------------------- From : dimka kuvshinov 2:5020/400 22 Sep 2000 08:03:42 To : All Subject : pdf -------------------------------------------------------------------------------- привет! у меня есть pdf файл, как я его могу перегнать в текстовый вид? скрипт такой: #!/usr/bin/perl -wT open PDF "r006c.pdf"; @pdf=<PDF>; close PDF; open TXT ">text.txt"; foreach $line(@pdf){ $pdfka=~s/?!(\w+)//ig;#что не текст-убираю(чего-то не работает, разберусь) print TXT $pdfka; } } close TXT; верно ли? в пдфке вообще может быть _не_текст_?? Дима -- Отправлено через сервер Talk.Ru - http://www.talk.ru --- ifmail v.2.15dev5 * Origin: Talk.ru (2:5020/400) Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
Архивное /ru.perl/64889efdeeed.html, оценка из 5, голосов 10
|