1. Este site usa cookies. Ao continuar a usar este site está a concordar com o nosso uso de cookies. Saber Mais.

Perl - Passar argumentos

Discussão em 'Programação' iniciada por Paos[CeRe4L], 6 de Julho de 2009. (Respostas: 2; Visualizações: 1077)

  1. Paos[CeRe4L]

    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
     
  2. K0mA

    K0mA Power Member

    xxx>perl script.pl "SELECT * FROM DBVersion";

    funcionou?
     
  3. Paos[CeRe4L]

    Paos[CeRe4L] Power Member

    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!
     

Partilhar esta Página