The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.

MD5Check - Use it for init Web files's md5 values of your site(or other dir), and check if it changed!

检查web目录(或者其他重要系统目录)md5值,当目录文件变化提醒。用于文件防篡改。

VERSION

Version 0.11

SYNOPSIS

    use MD5Check;

## 初始化目录md5值,参数为要监控的目录

    my $mydir=shift;
    print init($mydir);

## 对目录文件进行检查,只需输入之前保存的md5 文件值。

    use MD5Check;
    my $mydir=shift;
    print md5check($mydir);

# oneliner,perl单行程序实现功能。

需要安装该模块,简单通过 cpanm MD5Check 安装。

## 相关实例可以直接使用bin/下的init.pl 和 check.pl 单行执行

    $ perl -MMD5Check -e 'init("/web")' >file
    $ perl -MMD5Check -e 'print md5check(file)'..

DESCRIPTION

MD5Check - Use it for init Web files's md5 values of your site(or other dir), and check if it changed.

MD5Check is not standardized. This module is far from complete.

IMPLEMENTATION

#Init the web dir md5 values

    use MD5Check;
    my $mydir=shift;
    print  md5init($mydir,$OUT);
=====================
#check files 

    use MD5Check;
    my $mydir=shift;
    print md5check($mydir);

Git repo

https://github.com/bollwarm/MD5Check.git

AUTHOR

orange <linzhe@ijz.me>, http://ijz.me

COPYRIGHT AND LICENSE

Copyright (C) 2016 linzhe

This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself.

AUTHOR

orange, <linzhe at ijz.me>

BUGS

Please report any bugs or feature requests to bug-md5check at rt.cpan.org, or through the web interface at http://rt.cpan.org/NoAuth/ReportBug.html?Queue=MD5Check. I will be notified, and then you'll automatically be notified of progress on your bug as I make changes.

SUPPORT

You can find documentation for this module with the perldoc command.

 perldoc MD5Check

You can also look for information at:

# End of MD5Check