如何在Perl 5.8中使用Net:：Telnet:：Cisco忽略警告？

我安装了。Net:：telnet:：cisco模块，并尝试执行以下操作：

my $session = Net::Telnet::Cisco->new(Host=>'192.168.1.1',Ignore_warnings=>1);

但这似乎不起作用，并产生以下错误：

bad named parameter "Ignore_warnings" given to Net::Telnet::Cisco::new()

你知道问题出在哪里吗？

把它分开：

my $session = Net::Telnet::Cisco->new(Host => $host);
$session->ignore_warnings(1);

---

看起来像NTC里的一只虫子。我希望它在调用SUPER:：new之前应该从列表中删除其参数。

也尝试过这样做…下面是我在调用之后得到的错误：Net:：Telnet:：Cisco=GLOB（0x317c88）是一个[意外]对象