J/k about that, srry. :p The reason why I post this is because I have a problem with a package that doesn't exist for Activeperl: Net::Whois::ARIN::Network.
I tried to download the package file manually and put it in the appropriate directory(C:\Perl\site\lib\Net\Whois\ARIN\Network.pm), but it doesn't work. I get thesame error.
This is the error that I get when I run my script.
And this is when I exclude "use Net::Whois::ARIN::Network;":Can't locate Net/Whois/ARIN/Network.pm in @INC (@INC contains: C:/Perl +/site/lib C:/Perl/lib .) at C:\Users\Admin\Desktop\arin.pl line 3. BEGIN failed--compilation aborted at C:\Users\Admin\Desktop\arin.pl li +ne 3.
Here's my script:Can't call method "NetRange" on unblessed reference at C:\Users\Admin\ +Desktop\ar in.pl line 10.
I also made another script that works and gives me the output.#!usr/bin/perl use strict; use warnings; use Net::Whois::ARIN; use Net::Whois::ARIN::Network; my $w = Net::Whois::ARIN->new( host => 'whois.arin.net', port => 43, timeout => 30, ); my @output = $w->network("NERSC"); foreach my $net (@output) { print $net->NetRange."\n"; } exit;
Url's to packages:#!usr/bin/perl use strict; use warnings; use Net::Whois::ARIN; my $w = Net::Whois::ARIN->new( host => 'whois.arin.net', port => 43, timeout => 30, ); my @results = $w->query("NERSC"); foreach $result (@results) { print $result."\n"; } exit;
In reply to Activeperl: Net::Whois::ARIN::Network by marto9
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |