diff options
author | Vsevolod Stakhov <vsevolod@rambler-co.ru> | 2009-02-26 18:09:28 +0300 |
---|---|---|
committer | Vsevolod Stakhov <vsevolod@rambler-co.ru> | 2009-02-26 18:09:28 +0300 |
commit | cfb5348f75790ef694edd5a9c131890eeceec204 (patch) | |
tree | 55c6bc5ff03a346ced6008dcae0a70ba6b36fb32 /perl/Rspamd.pm | |
parent | 5d77f4552b6e39ab1072d2c91b219dac2498ac88 (diff) | |
download | rspamd-cfb5348f75790ef694edd5a9c131890eeceec204.tar.gz rspamd-cfb5348f75790ef694edd5a9c131890eeceec204.zip |
* Completely rewrite and reorganize perl API
* Add documentation for Mail::Rspamd
* Add install targets to cmake
--HG--
rename : perl/rspamd.pm => perl/Rspamd.pm
rename : perl/rspamd.xs => perl/Rspamd.xs
Diffstat (limited to 'perl/Rspamd.pm')
-rw-r--r-- | perl/Rspamd.pm | 54 |
1 files changed, 54 insertions, 0 deletions
diff --git a/perl/Rspamd.pm b/perl/Rspamd.pm new file mode 100644 index 000000000..2966cb3ca --- /dev/null +++ b/perl/Rspamd.pm @@ -0,0 +1,54 @@ +package Mail::Rspamd; + +use 5.006001; +use strict; +use warnings; + +require Exporter; + +our @ISA = qw(Exporter); +our @EXPORT = qw( + module_init + module_reload + LOG_ERROR + LOG_WARNING + LOG_MESSAGE + LOG_INFO + LOG_DEBUG +); + +our $VERSION = '0.0.1'; + +require XSLoader; +XSLoader::load('Rspamd', $VERSION); + +sub module_init { + my ($cfg) = @_; +} + +sub module_reload { + my ($cfg) = @_; +} + +use constant LOG_ERROR => 1 << 3; +use constant LOG_WARNING => 1 << 4; +use constant LOG_MESSAGE => 1 << 5; +use constant LOG_INFO => 1 << 6; +use constant LOG_DEBUG => 1 << 7; + +1; +__END__ + +=head1 NAME + +rspamd - Perl interface to the rspamd API + +=head1 SYNOPSIS + + use rspamd; + +=head1 DESCRIPTION + +TODO: Not ready yet + +=cut |