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 .