Como posso executar este script Perl no Windows?

Question

Estou tentando executar um script PERL pela primeira vez.

Aqui está: link

Eu nunca usei ou trabalhei com PERL antes e estou achando a documentação que é realmente confusa / difícil de entender (é bem pequena). Eu construí-lo no Windows 7 e corri o

./Build test

comando sugerido no arquivo README. Ele diz que é passado e todas as dependências instaladas.

Meu problema, no entanto, é simples, como eu uso este script ?! :) Eu suspeito que possa fazer mais sentido para as pessoas que usaram PERL antes. Para mim, a documentação é toda sem sentido.

Alguém poderia postar um exemplo de como eu usaria esse script, por favor?

Digamos que eu tenha uma página html, index.html e queira extrair os elementos principais dela.

O que eu faço?

    

Answer 1

Não é um script, por si só, mas sim um módulo. A fonte do módulo está vinculada na parte superior da página (o link Origem). Você precisa salvar o módulo no seu sistema para usá-lo.

Depois disso, você escreve seu próprio script que importa este módulo e, em seguida, você pode usar as funções do módulo em seu script.

A página tem um script de amostra que usa o módulo. Eu incluí abaixo com comentários sobre o que está fazendo:

#import the module, make it available to use further down the script
use HTML::ExtractMain qw( extract_main_html );

#define some HTML data, save in the $html variable
my $html = <<'END';
<div id="header">Header</div>
<div id="nav"><a href="/">Home</a></div>
<div id="body">
    <p>Foo</p>
    <p>Baz</p>
</div>
<div id="footer">Footer</div>
END

#call the extract_main_html function that is defined in the module
my $main_html = extract_main_html($html, output_type => 'xhtml');

#if you get results from the function call, do something with the results
if (defined $main_html) {
    # do something with $main_html here
    # $main_html is '<div id="body"><p>Foo</p><p>Baz</p></div>'
}