Mailinglist Archive: opensuse-es (424 mails)
| < Previous | Next > |
Re: [opensuse-es] Re: Script de Perl
- From: A C <eolo_555@xxxxxxxx>
- Date: Sun, 19 Dec 2010 12:10:31 +0000 (GMT)
- Message-id: <698488.62292.qm@xxxxxxxxxxxxxxxxxxxxxxxxxxx>
Voy a ver si lo puedo hacer en BASH con expect (una maquina corre solaris 9).
De todas formas he probado el articulo de
http://www.it-suniverse.com/trusted_ssh.php
y parce que funciona perfectamente.
Graias a todos
----- Mensaje original ----
De: Camaleón <noelamac@xxxxxxxxx>
Para: opensuse-es@xxxxxxxxxxxx
Enviado: sáb,18 diciembre, 2010 13:00
Asunto: [opensuse-es] Re: Script de Perl
El Fri, 17 Dec 2010 18:32:23 +0000, A C escribió:
Por lo que parece, no:
http://download.opensuse.org/repositories/devel:/languages:/perl/openSUSE_11.3/i586/
Con bash, scp y expect:
http://www.zedwood.com/article/142/linux-scp-expect-script
Saludos,
--
Camaleón
--
Para dar de baja la suscripción, mande un mensaje a:
opensuse-es+unsubscribe@xxxxxxxxxxxx
Para obtener el resto de direcciones-comando, mande
un mensaje a:
opensuse-es+help@xxxxxxxxxxxx
--
Para dar de baja la suscripción, mande un mensaje a:
opensuse-es+unsubscribe@xxxxxxxxxxxx
Para obtener el resto de direcciones-comando, mande
un mensaje a:
opensuse-es+help@xxxxxxxxxxxx
De todas formas he probado el articulo de
http://www.it-suniverse.com/trusted_ssh.php
y parce que funciona perfectamente.
Graias a todos
----- Mensaje original ----
De: Camaleón <noelamac@xxxxxxxxx>
Para: opensuse-es@xxxxxxxxxxxx
Enviado: sáb,18 diciembre, 2010 13:00
Asunto: [opensuse-es] Re: Script de Perl
El Fri, 17 Dec 2010 18:32:23 +0000, A C escribió:
Hola, estoy intentando hacer una copia remota de un fichero con un
script a un host que solo tiene abierto el puerto ssh.
Se me ha ocurrido hacerlo en Perl, y no encuentro la extensión (modulo
CPAN) Net::SCP::Expect;
¿¿Suse tiene este módulo ??
Por lo que parece, no:
http://download.opensuse.org/repositories/devel:/languages:/perl/openSUSE_11.3/i586/
El script es el siguiente:
#!/bin/perl
# Definimos los modulos de perl que vamos a usar use Net::SCP::Expect;
....
# Creamos la conexion para transferir el archivo
$scpe=Net::SCP::Expect->new(host => $host, user => $userS, password =>
$passwordS) or die $!;
# Transferimos el archivo
$scpe->scp(”$host:$archivo”, “$ruta/$archivo”); ....
¿¿ se puede hacer facilmente de otra manera ?
Con bash, scp y expect:
http://www.zedwood.com/article/142/linux-scp-expect-script
Saludos,
--
Camaleón
--
Para dar de baja la suscripción, mande un mensaje a:
opensuse-es+unsubscribe@xxxxxxxxxxxx
Para obtener el resto de direcciones-comando, mande
un mensaje a:
opensuse-es+help@xxxxxxxxxxxx
--
Para dar de baja la suscripción, mande un mensaje a:
opensuse-es+unsubscribe@xxxxxxxxxxxx
Para obtener el resto de direcciones-comando, mande
un mensaje a:
opensuse-es+help@xxxxxxxxxxxx
| < Previous | Next > |