|
Telnet est un programme utilisé pour accéder aux serveurs . Perl est un langage de programmation qui peut être utilisé pour accéder à l'interface Telnet via un package appelé « Net :: Telnet », qui est disponible en téléchargement gratuit . Le package Net :: Telnet permet aux programmeurs de communiquer avec un serveur en Perl utilisant les protocoles Telnet. Il existe une méthode au sein du paquet pour le nom de l' hôte. Ainsi , le nom de l'hôte peut être imprimé par Perl pendant dispose d'un accès à un serveur Telnet. Instructions
1 lancer l'invite de commande Windows. Cliquez sur " Démarrer", " Exécuter". Tapez " cmd.exe" puis appuyez sur "Entrée".
2 lancer le shell CPAN. À l'invite de commande: " perl- MCPAN -e shell" puis appuyez sur "Entrée".
3 installer Net :: Telnet. À l'invite de commande , tapez " install Net :: Telnet :: Cisco " puis appuyez sur "Entrée".
4 Lancez un éditeur de code ou Notepad.
5 utilisation le code suivant pour démarrer une connexion Telnet et invite à l'hôte : l'utilisation de
net :: Telnet ;
$ telnet = new net :: Telnet ( Timeout = > 10, Errmode => , ' die '); $ telnet -> open (' < nom_serveur ');
$ telnet -> waitfor (' /login : $ /i ');
$ telnet- > print (' ');
$ telnet -> waitfor (' /password: $ /i ');
$ telnet - > print ( '< login_password ');
$ telnet -> waitfor ('/\\ $ /i ');
$ telnet -> print (' host' ) ; < br > $ output = $ telnet -> waitfor ('/\\ $ /i ');
impression $ output ;
6 Enregistrez le fichier. Utilisez l'extension PL .
|
