Scroll to navigation

LOCALE::PO4A::COMMON.3PM(1) User Contributed Perl Documentation LOCALE::PO4A::COMMON.3PM(1)

NOME

Locale::Po4a::Commom - partes comuns dos scripts po4a e utils

DESCRIÇÃO

Locale::Po4a::Commom contém partes comuns dos scripts po4a e algumasfunções úteis utilizadas ao longo dos outros módulos.

Se necessário, pode desativar o uso de Text::WrapI18N da forma seguinte:

    use Locale::Po4a::Common qw(nowrapi18n);
    use Locale::Po4a::Text;

em vez de:

    use Locale::Po4a::Text;

O pedido é importante aqui: como a maioria dos módulos Locale::Po4a carregam-se Locale::Po4a::Common, a primeira vez que este módulo é carregado determina se Text::WrapI18N é usado.

FUNÇÕES

Mostrando mensagens de saída

  • show_version($)

    Mostra a versão atual do script e uma curta mensagem de direitos de autor. Leva o nome do script como um argumento.

  • wrap_msg($@)

    Esta função exibe uma mensagem da mesma forma que o sprintf(), mas dimensiona o resultado de forma que elas fiquem legal no terminal.

  • wrap_mod($$@)

    Esta função funciona como wrap_msg(), mas leva um nome de módulo como o primeiroargumento e deixa um espaço no lado esquerdo da mensagem.

  • wrap_ref_mod($$$@)

    Esta função funciona como wrap_msg(), mas é preciso dum file:line referência como o primeiro argumento, um nome de módulo como a segunda e deixa um espaço à esquerda da mensagem.

Invólucros para outros módulos

Locale::Gettext

Quando o módulo Locale::Gettext não pode ser carregado, este módulo fornece uma aplicação 'dummy' (vazio) das seguintes funções. Nesse caso, as mensagens po4a não serão traduzidas, mas o programa vai continuar a trabalhar.

Se Locale::gettext está presente, este invólucro também chama setlocale(LC_MESSAGES, "") assim os chamadores não dependem também do módulo POSIX.

  • bindtextdomain($$)
  • textdomain($)
  • gettext($)
  • dgettext($$)

AUTORES

 Jordi Vilalta <jvprat@gmail.com>

DIREITOS DE AUTOR E LICENÇA

Copyright © 2005 SPI, inc.

This program is free software; you may redistribute it and/or modify it under the terms of GPL v2.0 or later (see the COPYING file).

2024-07-02 perl v5.40.0