use Modern::Perl;
use DupEventChecker;

my $dir = DupEventChecker->new({dir_name => '.'});