Usando comandos shell com Perl
Publicado por Carlos Carvalho 27/07/2004
[ Hits: 14.475 ]
Esse script apresenta o módulo Shell.pm (CPAN) que permite utilizar comando shell diretamente, sem necessidade da intervenção de "system".
#!/usr/bin/perl -w use strict; #carregamos o modulo Shell.pm: use Shell; #Agora usamos comando shell de forma clara (sem system): #$password recebe saida do cat: $passwd = cat("</etc/passwd"); #imprime conteudo de /etc/passwd: print $passwd; #copia /etc/passwd para /tmp/passwd, lembra do "system("/bin/cp comando")" ? : cp("/etc/passwd", "/tmp/passwd"); #EOF
Separa os dígitos de um número
Lista de números aleatórios não-repetidos de um intervalo em Perl
Nenhum comentário foi encontrado.
Mamãe, quero descompactar e também compactar arquivos no terminal!
Deixando o Gnome bonitão em qualquer distribuição
Como ativar o módulo de cancelamento de ruído no Pipewire
Como escolher o melhor escalonador de CPU para melhorar o desempenho da máquina
Fazendo 100% no DOOM clássico sem tutorial
DSDA DOOM no Linux Mint 21.3 Virginia
Papagaiando (enfeitando) o KDE com efeitos do KWiN Burn My Windows
Como centralizar o widget Gerenciador de Tarefas Apenas Com Ícones do Painel do KDE
bc e calculos de horas - Duração de tempo (9)
Dúvidas com pacotes descontinuados (11)
Kernel pede para ser reinstalado (31)
O que eu faço com o pen drive de 200mb? [RESOLVIDO] (16)
Como Instalar Programas no computador remoto com GLPI Inventory (2)