Memonitor file dan direktori dengan perl
Karena isi konten yang sangat mirip ini, membuat para pemakai tanpa sadar memasukkan data ID dan password dari URL phising.
Bagaimana untuk menghindari phising di server kita ? cara yang paling mudah adalah kita monitor terus perubahan-perubahan yang terjadi di konten kita dengan memonitor isi file dan direktori.
Di perl ada modul yang cukup simpel dan mudah pemakaiannya, yaitu modul File::Monitor.
Versi module ini sudah lama tidak diupdate, akan tetapi masih lumayan sangat berguna bagi kita yang akan memonitor data kita agar ketika terjadi phising cepat diketahui.
Anda dapat mendownload file ini di CPAN,
dan menginstallnya seperti ini,
# tar xvfz File-Monitor-0.10.tar.gz
# cd File-Monitor-0.10
# perl Makefile.PL
# make
# make install
synopsis penulisan module ini adalah seperti berikut ini,
use File::Monitor;my $monitor = File::Monitor->new();
# Just watch
$monitor->watch(’somefile.txt’);# Watch with callback
$monitor->watch(’otherfile.txt’, sub {
my ($name, $event, $change) = @_;
# Do stuff
});# Watch a directory
$monitor->watch( {
name => ’somedir’,
recurse => 1,
callback => {
files_created => sub {
my ($name, $event, $change) = @_;
# Do stuff
}
}
} );# First scan just finds out about the monitored files. No changes
# will be reported.
$object->scan;# Later perform a scan and gather any changes
my @changes = $object->scan;
Module ini dapat memonitor dengan beberapa fitur sebagai berikut,
- memonitor perubahan atribut dari sebuah file
- memonitor file apabila ada file baru yang dibuat
- memonitor apabila ada file yang dihapus
- memonitor file apabila dihapus atau ditambah di suatu direktori
Anda pun dapat mengembangkannya dengan menggabungkan beberap module di perl sehingga akan sesuai dengan kebutuhan anda.
Module ini dapat mendeteksi atau memeriksa sekita 600 ribu data dalam waktu 20 menit. Apabila anda membutuhkan yang lebih cepat, ada baiknya anda mencoba perintah locate atau find.
Selamat mencoba.
Isi Komentar