Perl Net :: Nslookup模块无法正常工作？

Question

我认为这是一个非常基本的模块，对我来说没有意义......

这是我的基本脚本，它没有返回任何内容：

#!usr/bin/perl
use strict;
use warnings;
use Net::Nslookup;

my $prefix = "";
$prefix = $ARGV[0];
my $host = $prefix . "01" . ".company.com";
print "Host: $host\n\n";

my @test = ();
@test = nslookup "$host";
print "@test\n";

当我直接从命令行执行nslookup时，它会给我通常的输出。这对我没什么用。

我对此不了解什么？我看过cpan的网站：http://search.cpan.org/~darren/Net-Nslookup-2.02/lib/Net/Nslookup.pm但是这对我没有帮助，因为我正在尝试完全按照它显示的内容，但无济于事......