Comment puis-je déterminer si scp est disponible à partir de Perl?

Question

Dans Net::SCP à quel point ai-je besoin de touches DSC ou RSA (c'est-à-dire quand est-ce que j'utilise les fonctions get ou put)? Je voudrais savoir que le service scp est disponible sans transférer le fichier.

Answer 1

par the docs in CPAN, vous en avez besoin avant même importation ce module, et je cite:

« » » Q: Comment alimentez-vous un mot de passe pour se connecter avec ssh dans un script Perl utilisant le Net :: module SSH

A:... vous ne pas utiliser des clés RSA ou DSA Voir la ssh-keygen (1) manpage

"" »

en d'autres termes, NET::SCP est conçu pour être utilisé avec l'authentification SSH "sans mot de passe" via des paires de clés privées/publiques pré-générées et propagées.

Answer 2

Puisque Net::SCP est un wrapper à scp, vous n'avez pas besoin de fournir les clés du script (ce qui signifie que vous ne pouvez pas). Vous (ou quelqu'un d'autre) devez effectuer la configuration en configurant ssh avant d'essayer de l'utiliser.

NET :: SCP n'est pas destiné à être utilisé 'ad hoc'. Il nécessite la configuration de ssh et l'échange de clés.

EDIT incorporés commentaire des ysth

Answer 3

Si tout ce que vous voulez est de vérifier si le système distant est à l'écoute sur le port ssh/scp, vous pouvez essayer pinger:

use Net::Ping; 
$p = Net::Ping->new("tcp", 2); 
$p->port_number(scalar(getservbyname("ssh", "tcp"))); 
if ($p->ping($hostname)) { 
    print "ok!"; 
} 

Vous pouvez utiliser Net :: SSH ou Net :: SSH :: Expect ou Net :: SSH2 ou Net :: SSH :: Perl si vous avez des clés ou un mot de passe et que vous voulez vérifier que vous pouvez vous connecter sans transférer de fichiers.

Answer 4

Si vous envisagez d'utiliser SSH à l'aide de l'authentification par mot de passe, consultez la section Net::SSH::Perl.