XML :: Twig: является parsefile() более эффективным, чем parse()?

Question

Я написал довольно простой webapp в Perl и обрабатывает XML-файлы, используя XML::Twig. Эти XML-файлы довольно большие и сложные, поэтому я намеренно использую кусок по переменной chunk от XML::Twig, а не по методу «загрузить все сразу».

Однако этот webapp полностью падает и умирает, если я загружаю в большой XML-документ даже при использовании метода chunking. Я не мог понять, почему это происходит, потому что webapp размещен на общем сервере с 1and1.co.uk, и я не вижу файл журнала ошибок Apache. Даже когда вы завершаете вызовы в блоке eval{}, я не мог уловить его от смерти. Раздражающе, он отлично работает на моем сервере разработки дома, поэтому я не смог воспроизвести проблему.

Чтобы заставить его работать, я внесла изменения, чтобы вместо использования метода parse() и передачи в скаляр, содержащий весь XML, я написал XML в файл, а затем использовал parsefile($filename). Когда я сделал это изменение, это сработало.

Я немного смущен этим, tbh, и я попытался выяснить чудо Google, если parsefile() действительно более эффективен, чем parse(), но не смог найти что-либо. Кто-нибудь знает?

Answer 1

Я уверен, что 1 и 1 позволяют получить доступ к файлу журнала Apache, поскольку он является важным инструментом для отладки CGI и веб-приложений, таких как ваши. Дайте им крик и спросите их, как это сделать.

Если ваши файлы XML большие, то это портит точку использования XML::Twig в режиме куска. Также кажется вероятным, что ваше приложение терпит неудачу на сервере, потому что оно превысило квоту памяти. Опять же, звонок в вашу веб-хостинговую компанию расскажет вам, так ли это.

Как ваш XML попадает в память в первую очередь? Если вы вложили его в память из файла XML, просто оставите это исправление, и получите XML::Twig, чтобы читать непосредственно из файла. Если вы извлекаете XML из удаленного URL-адреса, помните, что XML::Twig имеет метод parseurl, который позволит избежать сбора данных в локальный файл. Я не могу думать о другом вероятном источнике, поэтому вам придется объяснять.

Answer 2

Посмотрите на источник. Это одно и то же.

В XML::Twigparsefile просто расширенный XML::Parser::parsefile (суперкласс):

sub parsefile 
    { my $t= shift; 
    if(-f $_[0] && ! -s $_[0]) { return _checked_parse_result(undef, "empty file '$_[0]'"); } 
    $t= eval { $t->SUPER::parsefile(@_); }; 
    return _checked_parse_result($t, $@); 
    } 

В XML::Parser, parsefile просто оберткой parse:

sub parsefile { 
    my $self = shift; 
    my $file = shift; 
    local(*FILE); 
    open(FILE, $file) or croak "Couldn't open $file:\n$!"; 
    binmode(FILE); 
    my @ret; 
    my $ret; 

    $self->{Base} = $file; 

    if (wantarray) { 
    eval { 
     @ret = $self->parse(*FILE, @_); 
    }; 
    } 
    else { 
    eval { 
     $ret = $self->parse(*FILE, @_); 
    }; 
    } 
    my $err = $@; 
    close(FILE); 
    die $err if $err; 

    return unless defined wantarray; 
    return wantarray ? @ret : $ret; 
}