Perl - Passar argumentos

Paos[CeRe4L]

Power Member
Bom dia,

Estou a tentar executar um script perl via linha de comandos (em windows). Tento passar-lhe um argumento mas não estou a conseguir. O código que apanha os argumentos é:

&ReadParse(*input);

$stmt = $input('stmt');

E estou a invocar na linha de comandos da seguinte forma:

xxx> perl script.pl stmt='SELECT * FROM DBVersion;'

O que é que estou a fazer mal? Alguém me pode dar uma ajudinha sff?

NOTA: o script não pode ser alterado uma vez que faz parte de uma ferramenta da Cisco.

Desde já obrigado pela vossa ajuda!

Abraço,

Filipe
 
nop!
Entretanto descobri o problema: o &ReadParse(input) é para ler informação que venha de um http post.

Tive de alterar o script para ler informação do argv.

Podem fechar!
 
Back
Topo