Variavel Perl no system

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.

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

Ahh beleza.. Valeu