a friend pointed out that i was only using the single colon in my use
statement, so i suppose my issue could be considered resolved. can someone
explain the statement on deprecated syntax however?
should i be seeing this? and what can i do to quiet this down?
thanks -charles
On Fri, 20 Jul 2001 [EMAIL PROTECTED] wrote:
> hello all-
> my script is as follows:
>
> #!/usr/bin/perl -w
>
> use strict;
> use Net::DNS;
>
> $res = new Net:DNS::Resolver;
> $query = $res->query("216.8.86.8","PTR");
>
> if ($query) {
> foreach $rr ($query->answer) {
> next unless $rr->type eq "PTR";
> print "ptrdname =", $rr->ptrdname, "\n";
> }
> } else {
> print "query failed: ", $res->errorstring, "\n";
> }
>
>
> however, when its ran, i receive:
>
> defined(@array) is deprecated at /usr/lib/perl5/site_perl/5.6.0/Net/DNS.pm
> line 137.
> (Maybe you should just omit the defined()?)
> syntax error at ./ipnew line 7, near "new Net:"
> Execution of ./ipnew aborted due to compilation errors.
>
> i am using perl5.6.0 and net-dns-0.12. A colleague has it running on
> another machine, and i believe that our code is the same. i have very
> limited experience with modules or creating objects using $scalar = new so
> a simple mistake could be lurking
>
> your advice is appreciated, -charles
>
>
>
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
