LOCALE::PO4A::COMMON.3PM(1) User Contributed Perl Documentation NOME Locale::Po4a::Common - partes comuns dos scripts e utilitarios do po4a DESCRICAO Locale::Po4a::Common contem partes comuns dos scripts do po4a e algumas funcoes uteis usadas junto com outros modulos. Se necessario, voce pode desabilitar o uso de Text::WrapI18N da seguinte forma: use Locale::Po4a::Common qw(nowrapi18n); use Locale::Po4a::Text; em vez de: use Locale::Po4a::Text; A ordem e importante aqui: como a maioria dos proprios modulos Locale::Po4a carregam Locale::Po4a::Common, a primeira vez que este modulo e carregado determina se Text::WrapI18N e usado. FUNCOES Mostrando as mensagens de saida o show_version($) Mostra a versao atual do script e uma curta mensagem de direitos autorais. Pega o nome do script como um argumento. o wrap_msg($@) Esta funcao exibe uma mensagem da mesma forma que o sprintf(), mas dimensiona o resultado de forma que elas fiquem legal no terminal. o wrap_mod($$@) Esta funcao funciona como wrap_msg(), mas pega o nome de um modulo como o primeiro argumento e deixa um espaco a esquerda da mensagem. o wrap_ref_mod($$$@) Esta funcao funciona como o wrap_msg(), mas leva uma referencia arquivo:linha como primeiro argumento, um nome de modulo como o segundo e deixa um espaco a esquerda da mensagem. Wrappers para outros modulos o Locale::Gettext Quando o modulo Locale::Gettext nao puder ser carregado, este modulo fornece uma implementacao ficticia (vazia) das funcoes a seguir. Neste caso, as mensagens do po4a nao serao traduzidas, mas o programa vai continuar a funcionar. Se Locale::gettext estiver presente, este wrapper tambem chama setlocale(LC_MESSAGES, "") de forma que chamadores tambem nao dependam do modulo POSIX. o bindtextdomain($$) o textdomain($) o gettext($) o dgettext($$) AUTORES Jordi Vilalta TRADUCAO Luiz Fernando Ranghetti Rafael Fontenelle COPYRIGHT E LICENCA Copyright (C) 2005 SPI, inc. Esse programa e um software livre; voce pode redistribui-lo e/ou modifica-lo sob os termos da GPL v2.0 ou posterior (veja o arquivo COPYING). perl v5.42.0 2025-11-22 LOCALE::PO4A::COMMON.3PM(1)