perl telnet 连接检查答案

【问题标题】：perl telnet connection checkingperl telnet 连接检查
【发布时间】：2016-03-07 17:37:09
【问题描述】：

我正在使用下面的代码通过主机和 IP 地址连接到 telnet，但它给了我一个错误，提示“无法在行的未定义值上调用方法“写入”” 但是当我尝试手动连接到主机和 IP 地址时，它的工作原理。

如何确定 telnet 连接是否正常？有什么帮助吗？

$ip = 14.12.345.32
$ip_port=12345
$port1 = new Net::Telnet->new( Host=>$ip,Port=>$ip_port, Timeout => 100, Errmode => 'return');
$port1->write("\n");

【问题讨论】：

标签： perl telnet

【解决方案1】：

只使用一个“新”。我更喜欢

$ip = 14.12.345.32;
$ip_port=12345;
$port1 = Net::Telnet->new( Host=>$ip,Port=>$ip_port, Timeout => 100, Errmode => 'return');

当然，不要忘记 use 语句和 use strict 和 use 警告（以及行尾的分号）。

【讨论】：