| 
            Last change
 on this file since 847 was             847, checked in by Kris Deugau, 3 years ago           | 
        
        
          | 
             
/trunk 
 
Add bare skeleton of BIND export 
 
 
           | 
        
        
          
            
              - 
Property                 svn:keywords
 set to                 
Date Rev Author Id
               
             
           | 
        
        
          | 
            File size:
            991 bytes
           | 
        
      
      
| Line |   | 
|---|
| 1 | # dns/trunk/DNSDB/ExportBIND.pm
 | 
|---|
| 2 | # BIND data export/publication
 | 
|---|
| 3 | # Call through DNSDB.pm's export() sub
 | 
|---|
| 4 | ##
 | 
|---|
| 5 | # $Id: ExportBIND.pm 847 2022-09-01 16:24:43Z kdeugau $
 | 
|---|
| 6 | # Copyright 2022 Kris Deugau <kdeugau@deepnet.cx>
 | 
|---|
| 7 | # 
 | 
|---|
| 8 | #    This program is free software: you can redistribute it and/or modify
 | 
|---|
| 9 | #    it under the terms of the GNU General Public License as published by
 | 
|---|
| 10 | #    the Free Software Foundation, either version 3 of the License, or
 | 
|---|
| 11 | #    (at your option) any later version. 
 | 
|---|
| 12 | # 
 | 
|---|
| 13 | #    This program is distributed in the hope that it will be useful,
 | 
|---|
| 14 | #    but WITHOUT ANY WARRANTY; without even the implied warranty of
 | 
|---|
| 15 | #    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 | 
|---|
| 16 | #    GNU General Public License for more details.
 | 
|---|
| 17 | # 
 | 
|---|
| 18 | #    You should have received a copy of the GNU General Public License
 | 
|---|
| 19 | #    along with this program.  If not, see <http://www.gnu.org/licenses/>.
 | 
|---|
| 20 | ##
 | 
|---|
| 21 | 
 | 
|---|
| 22 | package DNSDB::ExportBIND;
 | 
|---|
| 23 | 
 | 
|---|
| 24 | use strict;
 | 
|---|
| 25 | use warnings;
 | 
|---|
| 26 | 
 | 
|---|
| 27 | sub export {
 | 
|---|
| 28 |   # expected to be a DNSDB object
 | 
|---|
| 29 |   my $self = shift;
 | 
|---|
| 30 |   my $dbh = $self->{dbh};
 | 
|---|
| 31 | 
 | 
|---|
| 32 | }
 | 
|---|
| 33 | 
 | 
|---|
| 34 | 1;
 | 
|---|
       
      
  Note:
 See   
TracBrowser
 for help on using the repository browser.