equal
deleted
inserted
replaced
28 if (m{(.*)($zone_file)(";)}) { |
28 if (m{(.*)($zone_file)(";)}) { |
29 print "$2 ==> $2.signed\n"; |
29 print "$2 ==> $2.signed\n"; |
30 $_ = "$1$2.signed$3\n"; |
30 $_ = "$1$2.signed$3\n"; |
31 } |
31 } |
32 |
32 |
33 open (FILE, ">test"); |
33 open (FILE, ">$conf_file"); |
34 print FILE @c_content; |
34 print FILE @c_content; |
35 close (FILE); |
35 close (FILE); |
36 |
36 |
37 } |
37 } |
38 |
38 |
39 } else { |
39 } else { |
40 |
40 |
41 open (FILE, $conf_file); |
41 open (FILE, $conf_file); |
42 @c_content = <FILE>; |
42 @c_content = <FILE>; |
43 close (DATEI); |
43 close (FILE); |
44 |
44 |
45 foreach (@c_content) { |
45 foreach (@c_content) { |
46 if (m{(.*)($zone_file)\.signed(.*)}) { |
46 if (m{(.*)($zone_file)\.signed(.*)}) { |
47 print "$2.signed ==> $2\n"; |
47 print "$2.signed ==> $2\n"; |
48 $_ = "$1$2$3\n"; |
48 $_ = "$1$2$3\n"; |