Beefy Boxes and Bandwidth Generously Provided by pair Networks
There's more than one way to do things
 
PerlMonks  

Compare zone files in directory with what is listed in named.conf

by brianjb (Novice)
on May 15, 2013 at 19:11 UTC ( #1033730=perlquestion: print w/ replies, xml ) Need Help??

Help for this page

Select Code to Download


  1. or download this
    ###########################################
    # BIND 9 name server configuration file 
    ...
        type master;
        file "db.127.0.0";
    };
    
  2. or download this
    computer:zonefiles brian$ ls -al ~/zonefiles
    total 0
    ...
    -rw-r--r--   1 brian  brian    0 May 15 14:48 db.127.0.0
    -rw-r--r--   1 brian  brian    0 May 15 14:48 db.brian.com
    -rw-r--r--   1 brian  brian    0 May 15 14:48 db.test.com
    
  3. or download this
    #!/usr/bin/perl
    #  Putting all of the zonefiles lised in named.conf into an array
    ...
    foreach my $f (@list) {
      print "$f\n";
    }
    
  4. or download this
    computer:tmp brian$ ./brian.pl 
    db.test.com 
    ...
    db.127.0.0
    db.brian.com
    db.test.com
    

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: perlquestion [id://1033730]
Approved by fisher
Front-paged by fisher
help
Chatterbox?
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others chilling in the Monastery: (8)
As of 2014-11-24 16:50 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    My preferred Perl binaries come from:














    Results (143 votes), past polls