Um módulo fácil de usar para escrever backends do Github Webs baseado em CGI no Perl.
Na maioria dos casos, três declarações já são suficientes. Configure um script para acionar, um segredo compartilhado e um arquivo de log e você estará pronto para ir.
Ele também suporta a atualização de crachás de status Shields.io, dependendo do código de retorno do script do gatilho (ou sucesso/falha do garfo).
# !/usr/bin/perl
use CGI::Github::Webhook;
my $ghwh = CGI::Github::Webhook -> new(
mime_type => ' text/plain ' ,
trigger => ' /srv/some-github-project/bin/deploy.pl ' ,
trigger_backgrounded => 1,
secret => ' use a generated password here, nothing valuable ' ,
log => ' /srv/some-github-project/log/deployment.log ' ,
badge_to => ' /srv/some-github-project/htdocs/status.svg ' ,
);
$ghwh -> run();O módulo foi escrito sobre a frustração de não conseguir que o Github :: WebHook trabalhe em conjunto com o CGI.Pm.
Sua primeira encarnação foi escrita como um script CGI único que alimenta um webhook para o livro de gerenciamento de pacotes do Debian para desencadear construções das variantes de e-books e sua implantação em cada empurrão.
Copyright 2016 Axel beckert [email protected].
Este programa é software livre; Você pode redistribuí -lo e/ou modificá -lo nos termos de: a licença pública geral da GNU, conforme publicado pela Free Software Foundation, versão 1 ou (por sua opção) qualquer versão posterior; ou a licença artística.
Consulte http://dev.perl.org/license/ para obter mais informações.
Os crachás no diretório static-badges estão licenciadas sob a dedicação do domínio público da CC0 e não são protegidas por direitos autorais.