Variavel Perl no system

1. Variavel Perl no system

Vinicius
vitnick

(usa Ubuntu)

Enviado em 26/11/2012 - 13:40h

Galera, preciso fazer o seguinte:

my $ip = "127.0.0.1";
my $ping = system("ping $ip");
print $ping;

Como podem ver a variavel $ip ta dentro do system e assim nao ta rodando.
Só uma obs:
Sei que com o Net::Ping seria mais facil fazer isso, o problema é que com o Net::Ping necessita de root e eu quero executar como usuario normal.

Valeu

Edit: Já consegui. Nao tinha nenhum erro.


  


2. Re: Variavel Perl no system

Daniel Vinciguerra
dvinciguerra

(usa Debian)

Enviado em 11/12/2012 - 20:43h

Também pode usar o exec [] e o qx{} dependendo do contexto e do que quer fazer...

EXEMPLO:
$ perl -e "print qx{ ping $ARGV[0] }" 127.0.0.1

$ perl -e "system "ping $ARGV[0]"' 127.0.0.1

$ perl -e "exec "ping $ARGV[0]"' 127.0.0.1

[]'s


3. Re: Variavel Perl no system

Vinicius
vitnick

(usa Ubuntu)

Enviado em 13/12/2012 - 01:52h

Ahh beleza.. Valeu






Patrocínio

Site hospedado pelo provedor RedeHost.
Linux banner

Destaques

Artigos

Dicas

Tópicos

Top 10 do mês

Scripts