Desarrollo de Python
  1. Desarrollo de Python
  3. ¿Cómo llamar a un script de Python desde Perl?
Intereting Posts
Medir el tiempo que tarda una función en ejecutarse y completarse en Python Ejes radiales inversos de la plot polar de Matplotlib Comprobando la validez del correo electrónico en django / python Python: compruebe si se pierde la conexión IRC (PING PONG?) ¿Cómo encontrar el texto resumido de una URL dada en python / Django? Trazando datos categóricos con pandas y matplotlib ¿Cómo puedo imprimir todo el contenido de Wordnet (preferiblemente con NLTK)? permutaciones con valores únicos Definiendo un Mensaje NDEF actualizar la base de datos django para reflejar los cambios en los modelos existentes Diseñar rutas de importación en Python, recta y simple? ¡El constructor de DataFrame no se llama correctamente! error sqlalchemy existe por consulta Ejecutando un script R en python a través de subprocess.Popen 2 técnicas para incluir archivos en una distribución de Python: ¿cuál es mejor?

¿Cómo llamar a un script de Python desde Perl?

Necesito llamar “/usr/bin/pdf2txt.py” con algunos argumentos de mi script de Perl. Cómo debería hacer esto ?

Si necesita capturar STDOUT : 

my $ret = `/usr/bin/pdf2txt.py arg1 arg2`;

Puede capturar fácilmente STDERR redirigiéndolo a STDOUT: 

 my $ret = `/usr/bin/pdf2txt.py arg1 arg2 2>&1`;

Si necesita capturar el estado de salida , puede utilizar: 

 my $ret = system("/usr/bin/pdf2txt.py arg1 arg2");

Tenga en cuenta que tanto `` como system() bloquean hasta que el progtwig termina de ejecutarse.

Si no desea esperar, o si necesita capturar tanto el estado STDOUT / STDERR como el estado de salida, debe usar IPC :: Open3 . 

 my $output = `/usr/bin/pdf2txt.py arg1 arg2`;

Si no necesita la salida del script, pero desea el código de retorno, use system() : 

 ... my $bin = "/usr/bin/pdf2txt.py"; my @args = qw(arg1 arg2 arg3); my $cmd = "$bin ".join(" ", @args); system ($cmd) == 0 or die "command was unable to run to completion:\n$cmd\n";

La buena respuesta de Francisco: 

 my $ret = `/usr/bin/pdf2txt.py arg1 arg2 2>&1`;

es simplificado por Blagovest Buyukliev: 

 my $ret = `/usr/bin/pdf2txt.py arg1 arg2`;

La alternativa es, 

 my $ret = system(/usr/bin/pdf2txt.py arg1 arg2`);

No creo que funcione porque la salida se imprime en la pantalla y no se captura por $ret