| changeset 22 | d8df7660e2dd |
| parent 21 | 3c801b79db21 |
| child 23 | 6ea7152f33a7 |
| 21:3c801b79db21 | 22:d8df7660e2dd |
|---|---|
159 $len1 => $r{label}, |
159 $len1 => $r{label}, |
160 $r{ttl}, |
160 $r{ttl}, |
161 $len2 => $r{rrtype}, |
161 $len2 => $r{rrtype}, |
162 $r{data}; |
162 $r{data}; |
163 }; |
163 }; |
164 push @out, '; do NOT EDIT the SOA records SERIAL number!'; |
|
164 push @out, $print->($_) foreach @zone; |
165 push @out, $print->($_) foreach @zone; |
165 return join "\n", @out, ''; |
166 return join "\n", @out, ''; |
166 } |
167 } |
167 } |
168 } |
168 sub delta { |
169 sub delta { |