Lo que quieres es llamar a un script de la PC2 y guardar los datos en la PC2 ? y si le pones un server web y lo llamas por HTTP ?
Saludos
-
- Publicidad
Llamar a una función de otra máquina
13 mensajes
• Página 2 de 2 • 1, 2
Publicidad
por Perl user » 2007-01-15 11:30 @521
javierg escribiste:El problema que veo en utilizar lo de Telnet y SSH, es que cuadno lo he utilizado, los resultados me los guardaba en la máquina local de donde lo lanzaba.
Es decir si es script lo lanzaba desde maquina1, los resultados se me almacenaban en maquina 1
Con ssh también? no lo creo, utiliza Net::SSH y pruébalo, cualquier duda nos la comentas con código aquí en el foro.
Pero incluso directamente con ssh -l login host comando funciona.
Saludos,
- Perl user
- Maestro honorario
- Mensajes: 271
- Registrado: 2004-11-03 21:11 @924
Re: Llamar a una función de otra máquina
por casiano » 2007-08-04 06:11 @299
javierg escribiste:Muy buenas, otra dudilla. Tengo 2 máquinas, digamos maquina1 y maquina2.
Desde maquina1 quiero llamar a un script que hay en maquina2 y que se ejecute en maquina2. Digamos que este script se llama script2.pl
¿¿ Cómo podría hacer esta llamada ??
Puedes usar el módulo GRID::Machine que provee servicios de
llamada a procedimiento remota vía una conexión ssh. También provee
servicios de entrada/salida remota. Para usarlo deberás poder acceder a la máquina remota via ssh y tener habilitado autenticación automática vía ssh (lee la documentación del módulo para ver cómo hacerlo).
Sigue un ejemplo:
Using perl Syntax Highlighting
#!/usr/local/bin/perl -w
use strict;
use GRID::Machine;
my $m = GRID::Machine->new( host => shift()); 3 crea conexión
$m->chdir('/tmp'); # cambia de directorio en la máquina remota a /tmp
$m->put([ $0 ]); # copia el propio script en la máquina remota
$m->run("uname -a; ls -l $0"); # ejecuta estas instrucciones en remoto
use strict;
use GRID::Machine;
my $m = GRID::Machine->new( host => shift()); 3 crea conexión
$m->chdir('/tmp'); # cambia de directorio en la máquina remota a /tmp
$m->put([ $0 ]); # copia el propio script en la máquina remota
$m->run("uname -a; ls -l $0"); # ejecuta estas instrucciones en remoto
Coloreado en 0.003 segundos, usando GeSHi 1.0.8.4
Cuando se ejecuta este ejemplo se obtiene la salida:
- Código: Seleccionar todo
$ put.pl remote.machine
Linux remote.machine 2.6.15-1-686-smp #2 SMP Mon Mar 6 15:34:50 UTC 2006 i686 GNU/Linux
-rwxr-xr-x 1 casiano casiano 171 2007-07-01 11:46 ./put.pl
- casiano
- Perlero nuevo
- Mensajes: 2
- Registrado: 2007-06-11 02:08 @130
13 mensajes
• Página 2 de 2 • 1, 2
¿Quién está conectado?
Usuarios navegando por este Foro: No hay usuarios registrados visitando el Foro y 7 invitados