我认为使用的非常基本的模块对我来说没有意义......
这是我没有返回任何内容的非常基本的脚本：
#!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但这对我没有帮助，因为我正试图完全按照它显示的那样做，但无济于事...