[DMI] DMII 2.5

Работает как надо, но достаточно много предложений начинаются с пробела.
Добавлено
Как окозалось проблема решается в шелле одной командой
Код:
sed 's/^ *//' file.txt > newfile.txt
 
Патчик к словарю, ремонтирует сбор текстов. На нулленых версиях не проверялся.
 
Патчик к словарю, ремонтирует сбор текстов. На нулленых версиях не проверялся.
*** скрытое содержание ***

Просмотрел код - на нуленых версиях должно работать ка часы.:ay:
 
Не мог бы кто-нибудь написать все пакеты Synaptic для Ubuntu, необходимые для работы ДМИ?
С этим разобрался (с перлом пришлось помучатся). Скажите это нормально при установке Lpost-1.0
выдаёт следующие предупреждения:
Код:
LPost.c: В функции ‘_initialize’
LPost.c:23: предупреждение: incompatible implicit declaration of built-in function ‘strlen’
LPost.c: В функции ‘tag’
LPost.c:62: предупреждение: incompatible implicit declaration of built-in function ‘strlen’
LPost.c:63: предупреждение: incompatible implicit declaration of built-in function ‘strcpy’
lex.c: В функции ‘append_with_space’
lex.c:11: предупреждение: incompatible implicit declaration of built-in function ‘malloc’
lex.c:11: предупреждение: incompatible implicit declaration of built-in function ‘strlen’
lex.c:12: предупреждение: incompatible implicit declaration of built-in function ‘strcpy’
lex.c:13: предупреждение: incompatible implicit declaration of built-in function ‘strcat’
lex.c: В функции ‘append_with_char’
lex.c:25: предупреждение: incompatible implicit declaration of built-in function ‘malloc’
lex.c:25: предупреждение: incompatible implicit declaration of built-in function ‘strlen’
lex.c: В функции ‘perl_split’
lex.c:39: предупреждение: incompatible implicit declaration of built-in function ‘malloc’
lex.c:39: предупреждение: incompatible implicit declaration of built-in function ‘strlen’
lex.c:41: предупреждение: incompatible implicit declaration of built-in function ‘strcpy’
lex.c: В функции ‘perl_split_independent’
lex.c:62: предупреждение: incompatible implicit declaration of built-in function ‘malloc’
lex.c: В функции ‘perl_split_on_char’
lex.c:82: предупреждение: incompatible implicit declaration of built-in function ‘malloc’
lex.c:82: предупреждение: incompatible implicit declaration of built-in function ‘strlen’
lex.c: В функции ‘perl_split_on_nothing’
lex.c:103: предупреждение: incompatible implicit declaration of built-in function ‘malloc’
lex.c:103: предупреждение: incompatible implicit declaration of built-in function ‘strlen’
lex.c:104: предупреждение: incompatible implicit declaration of built-in function ‘strcpy’
lex.c: В функции ‘perl_explode’
lex.c:123: предупреждение: incompatible implicit declaration of built-in function ‘malloc’
lex.c:123: предупреждение: incompatible implicit declaration of built-in function ‘strlen’
lex.c: В функции ‘numspaces’
lex.c:150: предупреждение: incompatible implicit declaration of built-in function ‘strlen’
lex.c: В функции ‘numchars’
lex.c:160: предупреждение: incompatible implicit declaration of built-in function ‘strlen’
lex.c: В функции ‘return_tag’
lex.c:171: предупреждение: incompatible implicit declaration of built-in function ‘strchr’
memory.c: В функции ‘Memory_allocate’
memory.c:78: предупреждение: incompatible implicit declaration of built-in function ‘malloc’
memory.c:87: предупреждение: incompatible implicit declaration of built-in function ‘abort’
memory.c: В функции ‘Memory_reallocate’
memory.c:109: предупреждение: incompatible implicit declaration of built-in function ‘abort’
Генерация виснет на 33% в папке с дором только картинки
 
При запуске из консоли скрипта testing.pl
Код:
#!/usr/bin/perl 
print "Content-type: text/plain\n\n"; 
print "Hello world!<br>\n";
получаю в результате
Код:
Content-type: text/plain

Hello world!<br>

у мну install.pl вроде нормально запустился, сказал какие модули доставить, а все остальные скрипты выдают 500тый еррор, в том числе и из цитаты. куда курить подскажите?
 
у мну install.pl вроде нормально запустился, сказал какие модули доставить, а все остальные скрипты выдают 500тый еррор, в том числе и из цитаты. куда курить подскажите?

Я конечно могу ошибаться , но 500 ошибка на перловых скриптах - это либо прав необходимых нема , либо на сами скрипты права не поставлены правильные
 
Я конечно могу ошибаться , но 500 ошибка на перловых скриптах - это либо прав необходимых нема , либо на сами скрипты права не поставлены правильные

ты прав, но загвоздка в том, что права были выставлены по манулу. поставил 777 - зашуршало, но ведь не есть гут((( какие ж права куда нужны на самом деле?
 
ты прав, но загвоздка в том, что права были выставлены по манулу. поставил 777 - зашуршало, но ведь не есть гут((( какие ж права куда нужны на самом деле?
нее , три семерки неставь ни в коем случае. максмум 755. Но владелец файлов должен быть тот , под кем запускаются скрипты. apache , nobody или кто там у тебя запускает апач

получается тебе надо изменить владельца файлов
 
Не создает словари. В админке не происходит никакой реакции на Create. Процесс запускается файлом crdict.pl, попробовал запустить его из консоли - получил:
Код:
Can't locate auto/LPost/autosplit.ix in @INC (@INC contains: /usr/local/www/apache22/data/dmi25 /usr/local/lib/perl5/5.8.8/BSDPAN /usr/local/lib/perl5/site_perl/5.8.8/mach /usr/local/lib/perl5/site_perl/5.8.8 /usr/local/lib/perl5/site_perl /usr/local/lib/perl5/5.8.8/mach /usr/local/lib/perl5/5.8.8 .) at /usr/local/lib/perl5/5.8.8/AutoLoader.pm line 173.
 at /usr/local/www/apache22/data/dmi25/LPost.pm line 28
Can't locate loadable object for module LPost in @INC (@INC contains: /usr/local/www/apache22/data/dmi25 /usr/local/lib/perl5/5.8.8/BSDPAN /usr/local/lib/perl5/site_perl/5.8.8/mach /usr/local/lib/perl5/site_perl/5.8.8 /usr/local/lib/perl5/site_perl /usr/local/lib/perl5/5.8.8/mach /usr/local/lib/perl5/5.8.8 .) at ./crdict.pl line 8
Compilation failed in require at ./crdict.pl line 8.
BEGIN failed--compilation aborted at ./crdict.pl line 8.
AutoSplit установлен... что ему нужно?
 
Спасибо Для просмотра ссылки Войди или Зарегистрируйся за работающий пример на php... Посмотрел, разбивает, но иногда не совсем правильно. Написал тут свой первый скрипт на перле, так что ногами за код не пинать. :D

Смысл скрипта тот же, но только используется готовая библиотека, которая и разделяет текст на предложения. (В данном случае english, но есть для разных языков).

Собственно вот:
PHP:
#!/usr/bin/perl
use strict;
use warnings;
use Lingua::EN::Sentence qw/get_sentences/;

my $text;
open (INFILE, "<", "in.txt") or die $!;
while (my $data = <INFILE>) {
    $text .= $data;
}
close INFILE;

my $sentences = get_sentences $text;
open (OUTFILE, ">", "out.txt") or die $!;
foreach my $sentence (@$sentences) {
 print OUTFILE "$sentence\n"
}
close OUTFILE;

Для работы надо Lingua::EN::Sentence, который можно установить через CPAN.

Все остальное по принципу работы скрипта Для просмотра ссылки Войди или Зарегистрируйся, т.е. текст на входе в файле in.txt, на выходе в out.txt.

п.с. пробелов в начале строки нет ;)
 
Назад
Сверху