Thank you Connie for helping me on this, it was fixed
by below comment you made :)))
>> SOA: while ()
>> {
>> chomp;
>
>You don't need to chomp it, or you don't need $/ at
>last of the next line.
Priss
__
Do You Yahoo!?
Everything you'll
>
> Wonder if someone could help me, I am trying to write
> a script to pulls out all the machine names from a
> revese DNS file, some how, my script will only print
> out the machine names with 1.x.x.in-addr.arpa
>
> $nslookup = '/usr/local/bin/nslookup';
> $dig = '/usr/local/bin/dig';
>
Hiya,
Wonder if someone could help me, I am trying to write
a script to pulls out all the machine names from a
revese DNS file, some how, my script will only print
out the machine names with 1.x.x.in-addr.arpa
$nslookup = '/usr/local/bin/nslookup';
$dig = '/usr/local/bin/dig';
@ZONES = qw
