http://www.zago.eti.br/perl.txt FAQ com mensagens sobre perl e indicações de sites e tutoriais sobre perl. Use CTRL+F para refinar a pesquisa. Linha de: **************** separa mensagens ou tópicos. Veja também o FAQ sobre script em perl: http://www.zago.eti.br/script/perl.txt ******************************************************** Zago http://www.zago.eti.br/menu.html FAQ e artigos sobre Linux ********************************************************************** Veja no man: man cpan Pra configurar perl, na linha de comando, como root, digite: cpan [zago@faqcl10 zago]$ whereis cpan cpan: /usr/bin/cpan Ver pacotes disponiveis no CL10 apt-cache search perl ********************************************************************** Artigos em português. http://www.g2ctech.com/artigos/perl-suid.html Artigos, sites e documentação em Inglês. FAQ e documentação do Perl. http://perldoc.perl.org/ http://perldoc.perl.org/perlintro.html ********************************************************************** ********************************************************************** ********************************************************************** Justificador de texto com Perl --------------------------------------------------------------------- Colaboração: Gustavo Chaves [gustavo@cpqd.com.br] Aproveitando a deixa da mensagem sobre o justificador de texto com sed, enviada pelo Aurelio, o Gustavo me enviou um script similar que realiza a tarefa com perl: #!/usr/bin/perl -w # justify - justify text lines. # $Id: justify,v 1.2 2000/07/21 20:01:33 gustavo Exp $ $columns = 65; while (<>) { s/\s+$/\n/; # trim trailing spaces next unless $columns > length; # skip big lines @words = split /(?<=\S)\s+/; # split it preserving leading spaces $inter = @words - 1; # number of interword spaces next unless $inter > 0; # skip single worded and blank lines $length = 0; $length += length foreach @words; # sum up the size of the words $spaces = $columns - $length; # how many spaces for the line $blanks = int($spaces / $inter); # how many spaces for each interword $extra = $spaces % $inter; # extra spaces due to rounding next if ($blanks + !!$extra) > 5; # skip if we have to add too much space # Go on, rebuild the line. $_ = ''; for ($i=0; $i<$inter; ++$i) { $_ .= $words[$i] . ' ' x ($blanks + ($i<$extra)); } $_ .= $words[$i] . "\n"; } continue { print; } --------------------------------------------------------------- As mensagens da lista Dicas-L são veiculadas diariamente para 9257 assinantes. Para sair ou assinar a lista Dicas-L, consulte o documento que se encontra em http://www.Dicas-l.com.br/FAQ.html. A redistribuição desta e outras mensagens da lista Dicas-L pode ser feita livremente, deste que o conteúdo, inclusive esta nota, não sejam modificados. --------------------------------------------------------------- ********************************************************************** Perl: Documentação --------------------------------------------------------------------- Colaboração: Marco A P D' Andrade Uma pequena nota com relação à mensagem de ontem. Desde o dia em que a mensagem foi confeccionada até sua divulgação já aconteceram muitas coisas. O site divulgado ontem já saiu do ar. Parece que a pressão foi muito grande ... Vejam mais em http://swapoo.zophar.net/ e em http://swapoo.homepage.com/ Também, ao final desta mensagem, estou incluindo uma oferta de várias oportunidades de emprego no Universo Online (UOL). Eu estou apenas divulgando esta oferta, não tenho nenhuma informação além do que está escrito aqui e não me responsabilizo pelos dados anunciados. Qualquer informação adicional deve ser obtida com o contato indicado na mensagem. Agora, a dica de hoje: --------------------------------------------------------------------- Perl: Documentação Fiz algo que recomendo muito em listas de discussão... -= Li a documentação ! =- Encontrei no local mais indicado, onde nem mesmo eu procurava informações, pois não sabendo o que se pode fazer nunca vamos precisar do recurso não é mesmo! A dica básica é: perldoc perlfaq Mas como poucos dos participantes das listas de perl que eu continuo frequentando não costumam ler faq's e tutoriais mais extensos nada melhor que repassar as dicas. perldoc Mantem uma listagem resumo de todos os módulos que baixar do CPAN, com dicas de funcionamento e exemplos, 90% das vezes, um manual muito completo, e mais detalhes que qualquer resposta mastigada obtida nas listas de discussão! perldoc DBI perldoc DBD::Pg PS: Gosto de participar, não ataco iniciantes, mas as vezes simplesmente não respondo por perceber que sequer deu-se ao trabalho de fazer uma leitura, afinal contribuições são sempre voluntárias! perldoc perlfaq9 SendMail Quem tentou enviar um mail através do perl e nunca passou pelos terríveis timeouts de páginas ? Seria mais uma dica de sendmail que perl, mas muito utilizado tambem! sendmail -toi -odq - -toi = vc preenche o cabecalho - odq = põe em QUEUE, envio imediato! (Retorno em caso de erro) - Redefinindo processo "ps" Quantas vezes verificamos os processos que estão rodando e sequer sabemos qual processo é o que esta tão demorado ? Se eu derrubar este processo perl, o que vai parar ? Que tal saber o que o processo esta fazendo ? Basta redefinir $0 !!! Ridículo, mas muito eficiente! Faça o teste! #!/usr/bin/perl # $Rot= "Hello World ". $0 . " "; # ;) $0 .= "Inicio"; sleep 2; $x=100; while ( $x-- ) { $0 = $Rot . $x; sleep 1; } $0 = $Rot . "Finalizando"; sleep 5; #--- eof ps -awx | grep perl --------------------------------------------------------------------- O Universo Online (www.uol.com.br), tem disponivel no momento 6 vagas para Administradores de Sistemas, destinadas a formaçao de uma nova equipe de Atendimento Nivel 1. O turno de trabalho eh de 6 horas no esquema 5X1 (5 dias de trabalho 1 dia de descanso) e vai cobrir 7X24 horas. As vagas sao todas para a cidade de Sao Paulo. Perfil das vagas disponiveis: Adm. Sistemas Tr. Bons conhecimentos em Internet Conhecimento básico - TCP/IP, Webservers (IIS, Apache, Netscape). Conhecimento básico - Unix (Solaris), Linux, NT, BSD. é indispensável o conhecimento intermediario em algum dos Sistemas Oper. acima. Conhecimento básico - Programação perl, script shell. Conhecimento Hardware Inglês técnico Adm. Sistemas Jr Sólidos conhecimentos em Internet Conhecimento intermediário - TCP/IP, DNS, NFS, Webservers (IIS,Apache, Netscape). Conhecimento básico - segurança de rede e sistemas Conhecimento básico - Banco de dados Oracle, mysql, sqlserver Conhecimento intermediário - Unix (Solaris), Linux, NT, BSD. Conhecimento intermediário - Programação perl, script shell. Conhecimento Hardware Inglês técnico Adm. Sistemas PL Sólidos conhecimentos em Internet Conhecimento intermediário - TCP/IP, DNS, NFS, Webservers (IIS,Apache, Netscape). Conhecimento intermediário - segurança de rede e sistemas Conhecimento intermediário - Banco de dados Oracle, mysql, sqlserver Conhecimento intermediário - Unix (Solaris), Linux, NT, BSD. Conhecimento intermediário - Programação perl, c, script shell. Conhecimento Hardware Inglês técnico e intermediario conversação Adm. Sistemas Sr. Sólidos conhecimentos em Internet Conhecimento avaçado - TCP/IP, DNS, NFS, Webservers (IIS,Apache, Netscape). Tunning em TCP/IP e SISTEMAS Conhecimento avançado - segurança de rede e sistemas Conhecimento intermediário - Clusters, load balance, storages Conhecimento básico - Veritas, SDS. Conhecimento intermediário - Banco de Dados Oracle, Mysql, SQLServer Conhecimento avaçado - Unix (Solaris), Linux, NT, BSD. Conhecimento avaçado - Programação perl, PHP, script shell, . Conhecimento avaçado Hardware Inglês conversação avançado Os interessados devem enviar seus curriculos para e.brandi@uol.com.br, preferencialemente em .txt, ate a data limite de 25/08/2000. Apos analise dos curriculos, os candidatos pre-selecionados serao chamados para uma entrevista na sede do UOL." --------------------------------------------------------------- As mensagens da lista Dicas-L são veiculadas diariamente para 9780 assinantes. Para sair ou assinar a lista Dicas-L, consulte o documento que se encontra em http://www.Dicas-l.com.br/FAQ.html. A redistribuição desta e outras mensagens da lista Dicas-L pode ser feita livremente, deste que o conteúdo, inclusive esta nota, não sejam modificados. --------------------------------------------------------------- ********************************************************************** ********************************************************************** ********************************************************************** ********************************************************************** ********************************************************************** ********************************************************************** Perl e XML: Guias de Referência Rápida --------------------------------------------------------------------- A Editora Novatec lançou recentemente dois guias sobre assuntos quentes, na minha opinião: Perl e XML. Estes guias foram escritos pelo Décio Jr. e Otávio D. Décio. O Décio já teve a oportunidade de nos prestar um grande serviço, com a tradução do WebCalendar, o qual divulguei há algum tempo na Dicas-L. O WebCalendar foi escrito em Perl e pode ser baixado a partir do endereço http://www.math.utexas.edu/~mzou/WebCalendar.html Este software é simplesmente fantástico e estamos usando para várias finalidades aqui no Centro de Computação da Unicamp. Estes guias são bastante convenientes para quem precisa se familiarizar com determinado assunto. O Décio mantém uma página que contém o Sumário do Guia de Perl em formato PDF. O endereço é http://deciojr.virtualave.net/ --------------------------------------------------------------- As mensagens da lista Dicas-L são veiculadas diariamente para 12184 assinantes. Para sair ou assinar a lista Dicas-L, consulte o documento que se encontra em http://www.Dicas-l.com.br/FAQ.html. A redistribuição desta e outras mensagens da lista Dicas-L pode ser feita livremente, deste que o conteúdo, inclusive esta nota, não sejam modificados. --------------------------------------------------------------- ********************************************************************** Perl One Liners --------------------------------------------------------------------- Não é novidade para ninguém que a linguagem Perl é extremamente poderosa. Entretanto é possível realizar tarefas bastante complexas diretamente a partir da linha de comandos. Uma tarefa que vivo executando é a remoção de caracteres em branco, ou tabulações, do começo das linhas. Com perl, o comando abaixo resolve o problema: perl -pi -e "s/^\s*//" arquivo O que faz a mágica é a sequencia "s/^\s*//". A string \s indica, caracteres em branco, tabulações, marca de fim de linha e mais algumas coisas que eu não me lembro. Resumindo, tudo que não aparece na tela, que é o que eu quero eliminar do arquivo. O "*" após este caractere indica que eu quero substituir zero ou mais ocorrências do que vier antes, ou seja, o \s e tudo o que ele significa. --------------------------------------------------------------- As mensagens da lista Dicas-L são veiculadas diariamente para 12567 assinantes. Para sair ou assinar a lista Dicas-L, consulte o documento que se encontra em http://www.Dicas-l.com.br/FAQ.html. A redistribuição desta e outras mensagens da lista Dicas-L pode ser feita livremente, deste que o conteúdo, inclusive esta nota, não sejam modificados. --------------------------------------------------------------- ********************************************************************** Sua página mudou de endereço. O que fazer? --------------------------------- Você vai querer que o browser carregue automaticamente a nova página, certo?! Por exemplo, veja o que ocorre se você entrar em: http://uirapuru.pcs.usp.br/ Após 10 segundos, a página nova é carregada sem a intervenção do usuário. Como fazer isso? O Roberto Greiner dá a solução: Entre as tags do título head e /head coloque a seguinte tag HTML: ------------- ------------- onde: 10 = o número de segundos antes de desviar para a nova URL http://www.pcs.usp.br/~rgreiner = nova URL. ================================= ********************************************************************** select_row - tratamento de SELECT usando Perl-DBI --------------------------------- Antes um aviso: A partir de hoje o ViaLinuxis está com uma nova cara. Veja este mesmo boletim em formato html (link no final do email). Aproveite e veja também o índice dos boletins em: http://www.pcs.usp.br/~jkinoshi/bs/i0.html . Agradeço qualquer colaboração ou seja, qualquer crítica construtiva a respeito do novo layout. --------------------------------- O módulo DBI (Database independent interface for Perl) permite que seu script Perl se comunique com um banco de dados SQL (ex: oracle, mysql, etc.). Se você lida com Perl + SQL já deve ter observado que é comum se ter código mais ou menos assim: - prepara select e executa. - para cada linha recebida faça: tratamento específico. Eu criei a rotina "select_row" com o objetivo de não precisar repetir sempre a mesma estrutura acima. Veja a declaração: ------------- sub select_row { my $comando = shift; my $funcao = shift; $sth = $dbh->prepare($comando); $sth->execute or die "$DBI::errstr"; while ( @row = $sth->fetchrow_array ) { &$funcao(); }; $sth->finish; } ------------- E aqui tem um exemplo de uso: ------------- select_row("select lin,col,id from proj where pai = $codigo", sub { $antes{$row[0]}{$row[1]} = $row[2] ; }); ------------- Observe que @row deve ser um vetor global. No exemplo, $row[0] corresponde à coluna lin, $row[1] à col e $row[2] à id. Usando "select_row" você se concentra apenas na query SQL e no "miolo" do tratamento. ********************************************************************** Desafio - minha resposta. Como apaguei os arquivos de fotos não usadas. ----------------- Veja só o problema que tive ao preparar a palestra: Tirei um monte de fotos e depois preparei diversas páginas HTML usando apenas algumas fotos. Para economizar disco eu quiz remover todas as fotos que não foram usadas nas páginas HTML. Como eu resolvi o problema? Todas os arquivos de fotos eram do tipo D*.JPG. Se você usar algum comando como: grep JPG *.html >lixo Já vai coletar todas as linhas dos arquivos html que incluem a string "JPG". Exemplo real de algumas linhas de lixo: ------------- hw.html:winchester hw.html:
DCP00634.JPG ------------ Observe: posso ter arquivos .JPG repetidos e mais de um numa mesma linha. Depois é necessário trabalhar com o arquivo "lixo" para extrair os "D*.JPG" e gerar os comandos. Como fazer isso? Eu coloquei todas as fotos em um diretório reservado e resolvi copiar para um outro diretório somente as fotos que eram referenciadas pelas páginas HTML. Criei um script Perl que gerou um outro script para o bash contendo comandos copy. O script Perl "tirafoto.pl" : --------------- # coleta o nome das fotos que uso. while (<>) { if (/D\w+\.JPG/) { $fotos{$&} = 1; } foreach $a (keys %fotos) { print "cp $a ../ \n"; ---------------- Uso do script Perl: ---------------- perl tirafoto.pl lixo >movefoto ---------------- Veja o começo do arquivo movefoto. $ more movefoto cp DCP00634.JPG ../ cp DCP00670.JPG ../ cp DCP00590.JPG ../ cp DCP00671.JPG ../ cp DCP00591.JPG ../ cp DCP00672.JPG ../ cp DCP00592.JPG ../ cp DCP00673.JPG ../ cp DCP00593.JPG ../ cp DCP00674.JPG ../ Agora é só executar este arquivo com um comando como: $ bash movefoto O diretorio com todas as fotos pode agora ser removido. Espero que você possa ter entendido. A maior dificuldade está em se entender o Perl. Se você programa em outras linguagens e quer ter uma idéia do Perl veja o material da palestra que fiz na Sucessu em: http://www.pcs.usp.br/~jkinoshi/sucperl.html . ********************************************************************** Voce pode utilizar um modulo do perl chamado "Filter" que faz a criptografia do codigo (nao confunda com compilar, perl e' uma linguagem interpretada). Se voce estiver procurando por algo para melhorar performance da uma olhada no modulo fastcgi (www.fastcgi.com), ou se quiser apenas esconder o codigo use o modulo que falei acima. Abracos, Robson Gomes > Ha alguma maneira de compilar um script perl ? > > talvez para ganhar performance... ou ainda simplesmente para esconder o > codigo... ********************************************************************** De: Henrique Cesar Ulbrich Para: linux-br@bazar.conectiva.com.br Assunto: Re: (linux-br) Perl - Atualização Data: 18 Feb 2003 12:59:40 +0000 Historiadores acreditam que, em Ter 18 Fev 2003 14:08, Rois Lima disse: > Tenho notado que às vezes alguns modulos do Perl a Concetiva não > disponibiliza em RPM. E precisa? Existe o CPAN... Quanto a desinstalar o Perl antigo, acho que não precisa. Renomeie o /usr/bin/perl pra perl5 (por exemplo) e coloque um novo symlink para Perl novo em /usr/bin/perl. Os dois podem conviver tranquilamente, desde que instalados em diretórios diferentes (que tal /usr/local?). Na maioria das vezes os programas desenvolvidos para o perl velho funcionarão no novo. Se algum não funcionar, vc muda o interpretador de comandos no cabeçalho desse que não funcionou para #!/usr/bin/perl5 (ou outro que vc tenha colocado). Não é a solução mais elegante (pelo contrário, é um quick hack dos mais feios) mas funcionou pra mim numa oportunidade em que precisei ter ambos. Já fiz isso com o Python tb (o RedHat tinha um muito velho e eu o deixei em conjunto com o Python 2.1 que baixei de www.python.org). Hack hack hack -- Henrique Cesar Ulbrich ********************************************************************** De: Thiago Macieira Para: Leonardo de Almeida Dias , linux-br@bazar.conectiva.com.br Assunto: Re: (linux-br) Acentuação no perl do RH9 nao funciona Data: 11 May 2003 13:01:08 +0200 Leonardo de Almeida Dias wrote: >Pessoall, > >Fim uns scripts em perl, mas a acentuação brasileira não funciona.Isso >inclui 'ç', '~', etc... > >Quando leio um arquivo .txt que contém nomes brasileiros, ele traz o >seguinte erro em várias linhas: > >Malformed UTF-8 character (unexpected non-continuation byte 0x41, >immediately after start byte 0xc7) in pattern match (m//) at ./teste2.pl >line 10, line 536. Como ele está dizendo, o arquivo que você está lendo contém seqüências UTF-8 inválidas. Pelo erro que ele está reportando, ele encontrou um byte 0xC7 (Ç) seguido de um 0x41 (A). Em UTF-8 isto é inválido. Soluções: 1) converta o arquivo para UTF-8. É o recomendado. Aliás, faça isso com todos os seus arquivos. 2) configure o Perl para ler em Latin 1. Não faço a menor idéia de como isso se faz. Para converter um arquivo, use o GNU reconv ou o iconv. Por exemplo: cat arquivo | iconv -f latin1 -t utf8 > novoarquivo >Acho que seja algo ligado ao shell. Tem como mudar o caracterset do >shell para o brasileiro??? export LANG=pt_BR Note que o resto do sistema inteiro estará funcionando em UTF-8, inclusive o seu console/xterm. Ou seja, você é obrigado a converter para UTF-8 para poder mandar alguma coisa para a tela. -- ********************************************************************** De:  Ricardo Erbano Para:  Guilherme Dal Pizzol Cc:  cl@distro2.conectiva.com.br Assunto:  Re: [cl] Modulo net-snmp-perl CL9 Data:  Thu, 18 Dec 2003 22:04:28 -0200 Olá Guilherme, Em Qua, 2003-12-17 às 22:08, Guilherme Dal Pizzol escreveu: > Pessoal, > > Instalei o módulo net-snmp-perl no meu CL9, pois o mib2c > (net-snmp-utils) precisa do mesmo. Porém ao executar qualquer script > perl que 'require SNMP' o mesmo nao funciona, dando o seguinte erro: > > Can't locate SNMP.pm in @INC (@INC contains: > /usr/lib/perl5/5.8.0/i386-linux-thread-multi /usr/lib/perl5/5.8.0 > /usr/lib/perl5/site_perl/5.8.0/i386-linux-thread-multi > /usr/lib/perl5/site_perl/5.8.0 /usr/lib/perl5/site_perl > /usr/lib/perl5/vendor_perl/5.8.0/i386-linux-thread-multi > /usr/lib/perl5/vendor_perl/5.8.0 /usr/lib/perl5/vendor_perl .) at > ./teste.pl line 3. > > O SNMP.pm está localizado em /usr/lib/perl5/site_perl/5.8.0/Net/SNMP.pm, > que nao está incluso no @INC. > Provavelmente se você intalar os pacotes perl-net-snmp e perl-modules deve resolver o problema. > Isso é algum problema com a distribuição/configuração dos pacotes, ou é > alguma configuração que nao fiz de acordo no meu sistema? > Ao que parece ser um problema do pacote que você está instalando. Depois se funcionar instalando os pacotes que mensionei acima a correção do mesmo poderá ser feita. Atenciosamente, Ricardo Erbano. Conectiva Linux. ********************************************************************** De:  Arnaldo Carvalho de Melo Para:  Skyservice Cc:  cl@distro2.conectiva.com.br Assunto:  Re: [cl] biblioteca perl-GTK-GdkPixbuf Data:  Fri, 9 Jan 2004 15:39:48 -0200 Em Fri, Jan 09, 2004 at 02:16:09PM -0300, Skyservice escreveu: > gostaria de saber qual pacote para o cl9 corresponde ao > _*perl-GTK-GdkPixbuf*_, nessessário à compilação de _*Video-DVDRip*_ . > Nos cds com binários não o consegui encontrar. > Melor, há este pacote compilado para cl9 nos repositorios? no cl9: apt-get install Gtk-Perl.* no snapshot: apt-get install perl-gtk.* - Arnaldo ________________ ********************************************************************** De:  rogerio araujo Para:  Rodrigo Klein Santos Cc:  Lista LINUX-BR Assunto:  Re: (linux-br)Perl - HiRes.pm Data:  Wed, 18 Feb 2004 17:40:40 -0400 faca o seguinte perl -MCPAN -e shell install Time::HiRes isso vai instalar o modulo , talvez os arquivos estejam lá mas ele nao esteja realmente instaladp Rogério Rodrigues de Araújo Analista de Sistemas / Técnico em Informática Linux User #235776 - Machine #172486 Projeto LBA-Experimento em Grande Escala da Biosfera-Atmosfera da Amazonia Escritório e Laboratório de Apoio Rua 24 de Outubro, 3707 - Salé - Santarem - PA CEP 68040-010 email : rogerio@lbaeco.com.br / araujo.r@socs.com.br tel : + 55 93 523 4138 ********************************************************************** De:  Marcio Merlone Para:  Garak Cc:  linux-br@bazar2.conectiva.com.br Assunto:  Re: (linux-br)Makefile.PL: command not found Data:  Fri, 23 Apr 2004 14:44:10 -0300 Garak wrote: sh: line 1: Makefile.PL: command not found > Tente perl Makefile.PL [ ]´s -- -- Marcio Merlone ********************************************************************** De:  "André Luiz Felix Nunes" Responder-a:  andrefelix@fazu.br Para:  linux-br@bazar2.conectiva.com.br Assunto:  (linux-br) Erro em módulo do Perl 'Convert/TNEF'. Data:  Tue, 04 May 2004 09:38:34 -0300 Estou tentando instalar o amavis para rodar junto com o uvscan, mas na hora de testar a instalacao do amavis é mostrado o seguinte erro:  module not found in path: 'Convert/TNEF'. esse módulo está instalado. Em alguns tutoriais que mostram como instalar o amavis, é falado de um path para corrigir esse problema, mas no site do amavis isso não existe mais. Alguém sabe como resolver isso? Aparentemente ele está procurando no lugar errado, acho que é só trocar a busca do pacote. Para aqueles que me ajudaram na desinstalação do perl 5.8.3, é só remover a pasta perl5 da nova instalação que ele assume a antiga (5.8.0), fiquei uma semana pastando com isso para descobrir que era só fazer isso, mas valeu pelas dicas (o ./configure clean e ./configure unistall não deram certo). t+ Essa lista é 10. ------------------------------------------------------------------- André Luiz Felix Nunes Técnico de Suporte Pleno (34) 3318-4129 FAZU - Faculdades Associadas de Uberaba http://www.fazu.br/ ********************************************************************** De:  Jorge Godoy Para:  linux-br@bazar2.conectiva.com.br Assunto:  Re: (linux-br)atualizando modulos perl Data:  Wed, 26 May 2004 10:54:11 -0300 -----BEGIN PGP SIGNED MESSAGE----- Hash: SHA1 On Wednesday 26 May 2004 08:20, Wasley Almeida wrote: > qual é a forma mais facil para se atualizar modulos perl? melhor > ainda se tiver uma forma de fazer isso remotamente. Depende de como foram instalados. Se foram instalados via RPM ou gerenciador de pacotes, o melhor modo é atualizar o pacote. Isso garante a integridade do sistema como um todo, embora não garanta o funcionamento de todas as aplicações... Se foram instalados via CPAN, use o próprio CPAN para a atualização. As duas maneiras podem ser realizadas remotamente... - -- Godoy.     -----BEGIN PGP SIGNATURE----- Version: GnuPG v1.2.4 (GNU/Linux) ********************************************************************** De:  Carlos Carvalho Para:  linux-br@bazar2.conectiva.com.br Assunto:  RE: (linux-br)modulos perl Data:  Thu, 2 Sep 2004 14:34:57 -0300 Use cpan,no console digite cpan e depois "h" para exibir o menu de ajuda.    '>'Oi Pessoal,  '>'  '>'Como faço para verificar se tenho um determinado modulo perl instalado? Caso  '>'  '>'não tenha qual a forma mais facil e objetiva para estar instalado?  '>'  '>'Um Abraço  '>'WASLEY ********************************************************************** De:  Thiago Macieira Para:  linux-br@bazar2.conectiva.com.br Cc:  Carlos Martinelli Assunto:  Re: (linux-br)Como autenticar no VELOX? Data:  Tue, 14 Sep 2004 06:58:24 -0300 -----BEGIN PGP SIGNED MESSAGE----- Hash: SHA1 Carlos Martinelli wrote: >O problema eh que, na hora de executar o Script, depois do chmod eh > logico, ele da um erro, do interpretador perl, dizendo que nao achou o >IO/Socket.pm.....e para! > >Se alguem puder me socorrer, tanto com o uso do Script em perl quanto pelo >uso do lynx, eu agradeco... perl -MCPAN -e shell cpan> install IO::Socket - --   Thiago Macieira  -  Registered Linux user #65028    thiago (AT) macieira (DOT) info     ICQ UIN: 1967141   PGP/GPG: 0x6EF45358; fingerprint: ********************************************************************** De: Carlos Carvalho Para: Leonardo Pinto Cc: Linux-BR Lista Assunto: Re: (linux-br)Cahamada a script bash em perl Data: Wed, 02 Mar 2005 13:52:59 -0300 -----BEGIN PGP SIGNED MESSAGE----- Hash: SHA1 Leonardo Pinto wrote: | Olá Pessoas, | | Existe alguma maneira de executar um script shell dentro de um | programa perl? | Ja tentei de dentro do perl: "exec sh /sbin/meu-script.sh", | "exec /sbin/meu-script.sh" e nada. | | Sds, | | Leonardo Pinto. | system("/sbin/meu-script.sh"); - -- De: Leonardo Pinto Responder A: Leonardo Pinto Para: Francisco Jr Cc: Linux-BR Lista Assunto: Re: (linux-br)Cahamada a script bash em perl Data: Wed, 2 Mar 2005 12:26:01 -0000 Olá Francisco, Só funcionou com system "/sbin/meu-script.sh". Valeu... Sds, Leonardo Pinto. > Tente: > > exec /bin/sh script.sh > > ou no script.sh insira na primeira linha "#!/bin/sh" e torne o script executavel > (chmod +x script.sh)... dai e so chamar pelo perl "exec script.sh" > ********************************************************************** De: Alceu R. de Freitas Jr. Para: Linux BR Assunto: Re: (linux-br)Problema de compilacao Data: Mon, 25 Jul 2005 14:38:24 -0300 (ART) --- Faria escreveu: > Lista, > > Recentemente tive problemas para compilar programas, > por causa do > test_dianmic > > Isto aparece quando tentei instalar um modulo do > perl. Qual o módulo que você está tentando instalar? > make: ** [test_dynamic] Erro 2 /usr/bin/make test -- > NOT OK > Running make install > make test had returned bad status > > como resolver isso ? A maneira correta é descobrir que teste está sendo executado. Para isso você teria que saber programar em Perl e olhar o código. :-) A melhor maneira é checar se você tem ferramentas como make, gcc e outra para instalar programas via fonte. A maneira mais fácil de instalar um módulo Perl é usar o módulo CPAN. Digite perl -MCPAN -e shell e siga as instruções. Você vai precisar de uma conexão com a Internet (pode ser via proxy HTTP/FTP). []'s **********************************************************************