|
@@ -17,6 +17,10 @@ |
17 |
17 |
|
# You should have received a copy of the GNU General Public License |
18 |
18 |
|
# along with this program. If not, see <https://www.gnu.org/licenses/>. |
19 |
19 |
|
|
|
20 |
+ |
use File::Basename; |
|
21 |
+ |
use File::Spec; |
|
22 |
+ |
$dirname = File::Spec->rel2abs(dirname(__FILE__)); |
|
23 |
+ |
|
20 |
24 |
|
require 'logcheck.conf'; |
21 |
25 |
|
$mode="run"; |
22 |
26 |
|
|
|
@@ -36,10 +40,6 @@ |
36 |
40 |
|
exit 1; |
37 |
41 |
|
} |
38 |
42 |
|
|
39 |
|
- |
use File::Basename; |
40 |
|
- |
use File::Spec; |
41 |
|
- |
$dirname = File::Spec->rel2abs(dirname(__FILE__)); |
42 |
|
- |
|
43 |
43 |
|
$file_pidfile = $dirname."/logcheck.pid"; |
44 |
44 |
|
|
45 |
45 |
|
$file_whitelist = $dirname."/".$file_whitelist; |
|
@@ -48,7 +48,7 @@ |
48 |
48 |
|
sub head() { |
49 |
49 |
|
print "\n"; |
50 |
50 |
|
print "-----------------------------\n"; |
51 |
|
- |
print "This is logcheck.pl V1.0.6\n"; |
|
51 |
+ |
print "This is logcheck.pl V1.0.7\n"; |
52 |
52 |
|
print "https://peters-webcorner.de\n"; |
53 |
53 |
|
print "project hosted on github\n"; |
54 |
54 |
|
print "https://github.com/pstimpel/logcheck\n\n"; |