Commit | Line | Data |
e681beb3 |
1 | =encoding utf8 |
2 | |
5863e79d |
3 | =head1 NAME |
e681beb3 |
4 | |
5 | local::lib~[pt_br] - crie e use um lib/ local para módulos perl com PERL5LIB |
6 | |
7 | =head1 SINOPSE |
8 | |
9 | No código - |
10 | |
11 | use local::lib; # configura um lib local em ~/perl5 |
12 | |
13 | use local::lib '~/foo'; # idem, mas ~/foo |
14 | |
15 | # Ou... |
16 | use FindBin; |
17 | use local::lib "$FindBin::Bin/../suporte"; # bibliotecas de suporte locais à aplicação |
18 | |
19 | Pela linha de comando (shell) - |
20 | |
21 | # Instala o LWP e suas dependências não encontradas no diretório '~/perl5' |
22 | perl -MCPAN -Mlocal::lib -e 'CPAN::install(LWP)' |
23 | |
24 | # Apenas exibe alguns comandos úteis para a shell |
25 | $ perl -Mlocal::lib |
26 | export MODULEBUILDRC=/home/username/perl/.modulebuildrc |
27 | export PERL_MM_OPT='INSTALL_BASE=/home/username/perl' |
28 | export PERL5LIB='/home/username/perl/lib/perl5:/home/username/perl/lib/perl5/i386-linux' |
29 | export PATH="/home/username/perl/bin:$PATH" |
30 | |
31 | =head2 A técnica de 'bootstrapping' |
32 | |
33 | Uma forma comum de instalar o local::lib é usando o que é conhecido como |
34 | técnica de "bootstrapping". É uma boa abordagem caso seu administrador de |
35 | sistemas não tenha instalado o local::lib. Nesse caso, você precisará |
36 | instalar o local::lib em seu diretório de usuário. |
37 | |
38 | Caso você tenha privilégios de administrador, você ainda assim deverá |
39 | configurar suas variáveis de ambiente, como discutido no passo 4. Sem elas, |
40 | você ainda instalará módulos no CPAN do sistema e seus scripts Perl não |
41 | utilizarão o caminho para o lib/ que você definiu com o local::lib. |
42 | |
43 | Por padrão, o local::lib instala os módulos do CPAN e a si próprio em ~/perl5. |
44 | |
45 | Usuários do Windows devem ler L</Diferenças ao usar esse módulo em Win32>. |
46 | |
47 | 1. Baixe e descompacte o local::lib do CPAN (procure por "Download" na página |
48 | do CPAN sobre o local::lib). Faça isso como um usuário comum, não como root |
49 | ou administrador. Descompacte o arquivo em seu diretório de usuário ou em |
50 | qualquer outro local conveniente. |
51 | |
52 | 2. Execute isso: |
53 | |
54 | perl Makefile.PL --bootstrap |
55 | |
56 | Caso o sistema pergunte se deve configurar tudo que puder automaticamente, |
57 | você provavelmente deve responder que sim (yes). |
58 | |
59 | Para instalar o local::lib em um diretório que não o padrão, você precisará |
60 | especificá-lo ao chamar o bootstrap, da seguinte forma: |
61 | |
62 | perl Makefile.PL --bootstrap=~/foo |
63 | |
64 | 3. Execute isso: (local::lib assume que você possui o comando 'make' |
65 | instalado em seu sistema) |
66 | |
67 | make test && make install |
68 | |
69 | 4. Agora precisamos configurar as variáveis de ambiente apropriadas para |
70 | que o Perl use nosso recém-criado diretório lib/. Caso esteja usando bash |
71 | ou outra shell Bourne, você pode fazer isso adicionando a seguinte linha |
72 | em seu script de inicialização da shell: |
73 | |
74 | echo 'eval $(perl -I$HOME/perl5/lib/perl5 -Mlocal::lib)' >>~/.bashrc |
75 | |
76 | Caso esteja usando a shell C, pode fazer da seguinte forma: |
77 | |
78 | /bin/csh |
79 | echo $SHELL |
80 | /bin/csh |
81 | perl -I$HOME/perl5/lib/perl5 -Mlocal::lib >> ~/.cshrc |
82 | |
83 | Caso tenha passado para o bootstrap um diretório que não o padrão, você |
84 | precisará indicá-lo na chamada ao local::lib, dessa forma: |
85 | |
86 | echo 'eval $(perl -I$HOME/foo/lib/perl5 -Mlocal::lib=$HOME/foo)' >>~/.bashrc |
87 | |
88 | Após atualizar seu arquivo de configuração da shell, certifique-se de processá-lo |
89 | novamente para obter as modificações em sua shell atual. Shells Bourne usam |
90 | C<. ~/.bashrc> para isso, enquanto shells C usam C<source ~/.cshrc>. |
91 | |
92 | Se estiver em uma máquina lenta ou operando com grandes limitações de |
93 | espaço em disco, você pode desativar a geração automática de manpages a |
94 | partir do POD ao instalar módulos. Para isso, basta passar o argumento |
95 | C<--no-manpages> durante o bootstrap: |
96 | |
97 | perl Makefile.PL --bootstrap --no-manpages |
98 | |
99 | Para evitar ter que fazer vários bootstraps para vários ambientes de |
100 | módulos Perl na mesma conta de usuário - por exemplo se você usa o |
101 | local::lib para desenvolver diferentes aplicativos independentes - |
102 | você pode utilizar uma única instalação bootstrap do local::lib para |
103 | instalar módulos em diretórios diferentes da seguinte forma: |
104 | |
105 | cd ~/meudir1 |
106 | perl -Mlocal::lib=./ |
107 | eval $(perl -Mlocal::lib=./) ### Para configurar o ambiente apenas nessa shell |
108 | printenv ### Veja que o ~/meudir1 está na PERL5LIB |
109 | perl -MCPAN -e install ... ### Os módulos que quiser |
110 | cd ../meudir2 |
111 | ... REPITA ... |
112 | |
113 | Para múltiplos ambientes para múltiplos aplicativos você pode precisar incluir |
114 | uma versão modificada das instruções de C<< use FindBin >> no exemplo |
115 | "No código" acima. Caso tenha feito algo como o que foi descrito acima, terá |
116 | um conjunto de módulos Perl em C<< ~/meudir1/lib >>. Caso tenha um script em |
117 | C<< ~/meudir1/scripts/meuscript.pl >>, você precisará indicar a ele onde |
118 | encontrar os módulos que instalou para ele em C<< ~/meudir1/lib >>. |
119 | |
120 | Em C<< ~/meudir1/scripts/meuscript.pl >>: |
121 | |
122 | use strict; |
123 | use warnings; |
124 | use local::lib "$FindBin::Bin/.."; ### aponta para ~/meudir1 e o local::lib acha o lib/ |
125 | use lib "$FindBin::Bin/../lib"; ### aponta para ~/meudir1/lib |
126 | |
127 | Coloque isso antes de qualquer bloco BEGIN { ... } que precise dos módulos instalados. |
128 | |
129 | =head2 Diferenças ao usar esse módulo em Win32 |
130 | |
131 | Para configurar as variáveis de ambiente apropriadas para sua sessão atual |
132 | do C<CMD.exe>, você pode fazer assim: |
133 | |
134 | C:\>perl -Mlocal::lib |
135 | set MODULEBUILDRC=C:\DOCUME~1\ADMINI~1\perl5\.modulebuildrc |
136 | set PERL_MM_OPT=INSTALL_BASE=C:\DOCUME~1\ADMINI~1\perl5 |
137 | set PERL5LIB=C:\DOCUME~1\ADMINI~1\perl5\lib\perl5;C:\DOCUME~1\ADMINI~1\perl5\lib\perl5\MSWin32-x86-multi-thread |
138 | set PATH=C:\DOCUME~1\ADMINI~1\perl5\bin;%PATH% |
139 | |
140 | ### Para configurar o ambiente apenas dessa shell |
141 | C:\>perl -Mlocal::lib > %TEMP%\tmp.bat && %TEMP%\tmp.bat && del %TEMP%\temp.bat |
142 | ### em vez de $(perl -Mlocal::lib=./) |
143 | |
144 | Caso queira que as configurações do ambiente persistam, você precisará |
145 | adicioná-las em Painel de Controle -> Sistema, ou usar o L<App::local::lib::Win32Helper>. |
146 | |
147 | O "~" é transformado no diretório do perfil do usuário (o diretório com o |
148 | nome do usuário dentro de "Documents and Settings" (Windows XP ou anterior) |
149 | ou "Usuários" (Windows Vista e mais recentes)) a menos que $ENV{HOME} exista. |
150 | Após isso, o nome do diretório é encurtado e os subdiretórios são criados |
151 | (o que significa que o diretório deve existir). |
152 | |
153 | =head1 MOTIVAÇÃO |
154 | |
155 | A versão de um pacote Perl na sua máquina nem sempre é a que você precisa. |
156 | Obviamente, a melhor coisa a fazer seria atualizá-la para a versão desejada. |
157 | No entanto, você pode estar em uma situação que o impede de fazer isso. |
158 | Talvez você não tenha privilégios de administrador do sistema; ou talvez |
159 | esteja usando um sistema de gerenciamento de pacotes como o do Debian, |
160 | e ainda não exista um pacote disponível na versão desejada. |
161 | |
162 | local::lib resolve esse probleme possibilitando a criação de seu próprio |
163 | diretório de pacotes Perl obtidos do CPAN (em sistemas multi-usuário, isso |
164 | normalmente fica dentro do diretório de seu usuário). A instalação do Perl |
165 | no sistema permanece inalterada; você simplesmente chama o Perl com opções |
166 | especiais para que ele use os pacotes em seu diretório local em vez dos |
167 | pacotes do sistema. O local::lib organiza as coisas para que versões dos |
168 | pacotes Perl instalados localmente tenham precedência sobre as do sistema. |
169 | |
170 | Caso esteja usando um sistema de gerenciamento de pacote (como em sistemas |
171 | Debian), não precisará se preocupar com conflitos entre o Debian e o CPAN. |
172 | Sua versão local dos pacotes será instalada em um diretório completamente |
173 | diferente das versões instaladas pelo gerenciador de pacotes do sistema. |
174 | |
175 | =head1 DESCRIÇÃO |
176 | |
177 | Este módulo oferece uma forma rápida e conveniente para criar um repositório |
178 | de módulos locais ao usuário, dentro do diretório do mesmo. Ele também monta |
179 | e exibe para o usuário uma lista de variáveis de ambiente utilizando a |
180 | sintaxe da shell atual do usuário (conforme especificado pela variável |
181 | de ambiente C<SHELL>), pronta para ser adicionada diretamente no arquivo |
182 | de configuração da shell. |
183 | |
184 | Generalizando, o local::lib permite a criação e uso de um diretório contendo |
185 | módulos Perl fora do C<@INC> do Perl. Isso facilita a produção de aplicações |
186 | com uma versão específica de determinado módulo, ou coleção de módulos. |
187 | Também é útil quando o mantenedor de um módulo não aplicou determinado patch |
188 | que você precisa para seu aplicativo. |
189 | |
190 | Durante o C<import>, o local::lib define valores apropriados para as |
191 | seguintes variáveis de ambiente: |
192 | |
193 | =over 4 |
194 | |
195 | =item MODULEBUILDRC |
196 | |
197 | =item PERL_MM_OPT |
198 | |
199 | =item PERL5LIB |
200 | |
201 | =item PATH |
202 | |
203 | valores serão anexados ao PATH, em vez de substituí-lo. |
204 | |
205 | =back |
206 | |
207 | Esses valores são então disponibilizados para referência por qualquer |
208 | outro código após o C<import>. |
209 | |
210 | =head1 CRIANDO UM CONJUNTO AUTO-CONTIDO DE MÓDULOS |
211 | |
212 | Veja L<lib::core::only|lib::core::only> para uma maneira de fazer isso - mas |
213 | note que há uma série de ressalvas na abordagem, e a melhor forma é sempre |
214 | fazer o 'build' contra uma versão limpa do perl (i.e. com 'site' e 'vendor' |
215 | o mais vazios possível). |
216 | |
217 | =head1 MÉTODOS |
218 | |
a949ebcd |
219 | =head2 ensure_dir_structure_for |
e681beb3 |
220 | |
221 | =over 4 |
222 | |
b41e7884 |
223 | =item Argumentos: $caminho_do_diretorio |
a949ebcd |
224 | |
b41e7884 |
225 | =item Valor de Retorno: Nenhum |
e681beb3 |
226 | |
227 | =back |
228 | |
229 | Tenta criar o caminho fornecido, e todos os diretórios superiores necessários. Gera uma exceção em caso de falha. |
230 | |
231 | =head2 print_environment_vars_for |
232 | |
233 | =over 4 |
234 | |
b41e7884 |
235 | =item Argumentos: $caminho_do_diretorio |
a949ebcd |
236 | |
b41e7884 |
237 | =item Valor de Retorno: Nenhum |
e681beb3 |
238 | |
239 | =back |
240 | |
241 | Exibe na saída padrão as variáveis listadas acima, devidamente ajustadas |
242 | para utilizar o caminho fornecido como diretório base. |
243 | |
a949ebcd |
244 | =head2 build_environment_vars_for |
245 | |
246 | =over 4 |
247 | |
b41e7884 |
248 | =item Argumentos: $caminho_do_diretorio, $interpolar |
a949ebcd |
249 | |
b41e7884 |
250 | =item Valor de Retorno: %variaveis_de_ambiente |
a949ebcd |
251 | |
252 | =back |
253 | |
b41e7884 |
254 | Retorna hash contendo as variáveis de ambiente listadas acima, devidamente |
255 | ajustadas para utilizar o caminho fornecido como diretório base. |
256 | |
e681beb3 |
257 | =head2 setup_env_hash_for |
258 | |
259 | =over 4 |
260 | |
b41e7884 |
261 | =item Argumentos: $caminho_do_diretorio |
a949ebcd |
262 | |
b41e7884 |
263 | =item Valor de Retorno: Nenhum |
e681beb3 |
264 | |
265 | =back |
266 | |
267 | Constrói as chaves no C<%ENV> para o caminho fornecido, chamando |
268 | C<build_environment_vars_for>. |
269 | |
270 | =head2 install_base_perl_path |
271 | |
272 | =over 4 |
273 | |
b41e7884 |
274 | =item Argumentos: $caminho_do_diretorio |
a949ebcd |
275 | |
b41e7884 |
276 | =item Valor de Retorno: $caminho_base_de_instalacao |
e681beb3 |
277 | |
278 | =back |
279 | |
280 | Retorna um caminho de diretório indicando onde instalar os módulos Perl |
281 | para essa instalação local de bibliotecas. Adiciona os diretórios C<lib> |
282 | e C<perl5> ao final do caminho fornecido. |
283 | |
284 | =head2 install_base_arch_path |
285 | |
286 | =over 4 |
287 | |
b41e7884 |
288 | =item Argumentos: $caminho_do_diretorio |
a949ebcd |
289 | |
b41e7884 |
290 | =item Valor de Retorno: $caminho_base_de_instalacao_arch |
e681beb3 |
291 | |
292 | =back |
293 | |
294 | Retorna um caminho de diretório indicando onde instalar os módulos Perl |
295 | de arquiteturas específicas para essa instalação local de bibliotecas. |
296 | Baseia-se no valor de retorno do método L</install_base_perl_path>, |
297 | adicionando o valor de C<$Config{archname}>. |
298 | |
299 | =head2 install_base_bin_path |
300 | |
301 | =over 4 |
302 | |
b41e7884 |
303 | =item Argumentos: $caminho_do_diretorio |
a949ebcd |
304 | |
b41e7884 |
305 | =item Valor de Retorno: $caminho_base_de_instalacao_bin |
e681beb3 |
306 | |
307 | =back |
308 | |
309 | Retorna um caminho de diretório indicando onde instalar programas executáveis |
310 | para essa instalação local de bibliotecas. Baseia-se no valor de retorno do |
311 | método L</install_base_perl_path>, adicionando o diretório C<bin>. |
312 | |
313 | =head2 modulebuildrc_path |
314 | |
315 | =over 4 |
316 | |
b41e7884 |
317 | =item Argumentos: $caminho_do_diretorio |
a949ebcd |
318 | |
b41e7884 |
319 | =item Valor de Retorno: $caminho_para_modulebuildrc |
e681beb3 |
320 | |
321 | =back |
322 | |
323 | Retorna um caminho de diretório indicando onde instalar o arquivo |
324 | C<.modulebuildrc>, baseado no caminho fornecido. |
325 | |
326 | =head2 resolve_empty_path |
327 | |
328 | =over 4 |
329 | |
b41e7884 |
330 | =item Argumentos: $caminho_do_diretorio |
a949ebcd |
331 | |
b41e7884 |
332 | =item Valor de Retorno: $caminho_base_de_instalacao |
e681beb3 |
333 | |
334 | =back |
335 | |
336 | Cria e retorna o caminho de diretório raiz em que a instalação local de |
337 | módulos deve ser feita. O padrão é C<~/perl5>. |
338 | |
339 | =head2 resolve_home_path |
340 | |
341 | =over 4 |
342 | |
b41e7884 |
343 | =item Argumentos: $caminho_do_diretorio |
a949ebcd |
344 | |
b41e7884 |
345 | =item Valor de Retorno: $caminho_para_home |
e681beb3 |
346 | |
347 | =back |
348 | |
349 | Procura pelo diretório padrão (home) do usuário. Caso esteja instalado, |
350 | utiliza o C<File::HomeDir> para isso. Gera uma exceção caso não encontre |
351 | resultado definitivo. |
352 | |
353 | =head2 resolve_relative_path |
354 | |
355 | =over 4 |
356 | |
b41e7884 |
357 | =item Argumentos: $caminho_do_diretorio |
a949ebcd |
358 | |
b41e7884 |
359 | =item Valor de Retorno: $caminho_absoluto |
e681beb3 |
360 | |
361 | =back |
362 | |
363 | Transforma o caminho fornecido em um caminho absoluto. |
364 | |
365 | =head2 resolve_path |
366 | |
367 | =over 4 |
368 | |
b41e7884 |
369 | =item Argumentos: $caminho_do_diretorio |
a949ebcd |
370 | |
b41e7884 |
371 | =item Valor de Retorno: $caminho_absoluto |
e681beb3 |
372 | |
373 | =back |
374 | |
375 | Invoca os seguintes métodos em sequência, passando o resultado do método |
376 | anterior para o seguinte, na tentativa de descobrir onde configurar o |
377 | ambiente para a instalação local de bibliotecas: L</resolve_empty_path>, |
378 | L</resolve_home_path>, L</resolve_relative_path>. Passa o caminho de |
379 | diretório fornecido para L</resolve_empty_path> que retorna um resultado |
380 | que é passado para L</resolve_home_path>, que então tem seu resultado |
381 | passado para L</resolve_relative_path>. O resultado dessa chamada final |
382 | é então retornado pelo L</resolve_path>. |
383 | |
384 | =head1 UM AVISO SOBRE UNINST=1 |
385 | |
386 | Tenha cuidado ao usar o local::lib em conjunto com "make install UNINST=1". |
387 | A idéia dessa opção é desinstalar a versão anterior de um módulo antes de |
388 | instalar a mais recente. No entanto ela não possui uma verificação de |
389 | segurança de que a versão antiga e a nova referem-se ao mesmo diretório. |
390 | Usada em combinação com o local::lib, você pode potencialmente apagar uma |
391 | versão globalmente acessível de um módulo e instalar a versão mais nova |
392 | no diretório local. Apenas utilize "make install UNINST=1" junto com o |
393 | local::lib se você entende essas possíveis consequências. |
394 | |
395 | =head1 LIMITAÇÕES |
396 | |
397 | As ferramentas auxiliares do perl não conseguem lidar com nomes de |
398 | diretórios contendo espaços, então não é possível fazer seu bootstrap |
399 | do local::lib em um diretório com espaços. O que você pode fazer é mover |
400 | seu local::lib para um diretório com espaços B<após> ter instalado todos |
401 | os módulos dentro dele. Mas esteja ciente que você não poderá atualizar |
402 | ou instalar outros módulos do CPAN nesse diretório local após a mudança. |
403 | |
404 | A detecção da shell é relativamente básica. Neste momento, qualquer coisa |
405 | com csh no nome será tratada como a C shell ou compatível, e todo o resto |
406 | será tratado como Bourne, exceto em sistemas Win32. Caso a variável de |
407 | ambiente C<SHELL> não esteja disponível, assumiremos tratar-se de uma |
408 | shell compatível com a Bourne. |
409 | |
410 | A técnica de bootstrap é um hack e usará o CPAN.pm para o ExtUtils::MakeMaker |
411 | mesmo que você tenha o CPANPLUS instalado. |
412 | |
413 | Destrói qualquer valor pré-existente nas variáveis de ambiente PERL5LIB, |
414 | PERL_MM_OPT e MODULEBUILDRC. |
415 | |
416 | Provavelmente deveria auto-configurar o CPAN caso isso ainda não tenha |
417 | sido feito. |
418 | |
419 | Correções (patches) são muito bem-vindos para quaisquer dos itens acima. |
420 | |
421 | Em sistemas Win32, não há uma forma de escrever no registro as variáveis |
422 | de ambiente criadas, para que elas persistam a uma reinicialização. |
423 | |
424 | =head1 SOLUÇÃO DE PROBLEMAS |
425 | |
426 | Se você configurou o local::lib para instalar módulos do CPAN em algum lugar |
427 | do seu 'home', e mais tarde tentou instalar um módulo fazendo C<cpan -i |
428 | Foo::Bar>, mas ele falhou com um erro como: C<Warning: You do not have |
429 | permissions to install into /usr/lib64/perl5/site_perl/5.8.8/x86_64-linux at |
430 | /usr/lib64/perl5/5.8.8/Foo/Bar.pm> e em algum lugar no seu log de instalação |
431 | houver um erro dizendo C<'INSTALL_BASE' is not a known MakeMaker parameter |
432 | name>, então você de alguma forma perdeu seu ExtUtils::MakeMaker atualizado. |
433 | |
434 | Para remediar a situação, execute novamente o procedimento de bootstrap |
435 | descrito acima. |
436 | |
437 | Então, execute C<rm -r ~/.cpan/build/Foo-Bar*> |
438 | |
439 | Finalmente, execute novamente o C<cpan -i Foo::Bar> e ele deve instalar |
440 | sem problemas. |
441 | |
442 | =head1 AMBIENTE |
443 | |
444 | =over 4 |
445 | |
446 | =item SHELL |
447 | |
448 | =item COMSPEC |
449 | |
450 | O local::lib procura pela variável de ambiente C<SHELL> do usuário ao |
451 | processar e exibir os comandos a serem adicionados no arquivo de |
452 | configuração da shell. |
453 | |
454 | Em sistemas Win32, C<COMSPEC> também será examinado. |
455 | |
456 | =back |
457 | |
458 | =head1 SUPORTE |
459 | |
460 | IRC: |
461 | |
462 | Acesse #local-lib em irc.perl.org. |
463 | |
464 | =head1 AUTOR DA TRADUÇÃO |
465 | |
1313d3bf |
466 | Breno G. de Oliveira, C<< <garu at cpan.org> >>, após ter perdido uma aposta |
467 | para o L<Getty|http://search.cpan.org/~getty/> durante a Copa de 2010. |
468 | |
e681beb3 |
469 | |
470 | =head1 COPYRIGHT |
471 | |
472 | Copyright (c) 2007 - 2010 L</AUTOR> e L</COLABORADORES> do local::lib como |
473 | listados em L<local::lib>. |
474 | |
475 | =head1 LICENÇA |
476 | |
477 | Esta biblioteca é software livre e pode ser distribuída sob os mesmo termos |
478 | do perl. |
479 | |