vpopmail.pm

perl module I wrote to interface with vpopmail.
Originally written to centralize authentication for mail and radius

news

01.16.05 - since i get emails about this every once in awhile:
if your build fails because of crypt() realted errors
you can comment out the "crypt" definition in ~vpopmail/include/vpopmail.h while you run make and make test for vpopmail.pm. This means: change the line in vpopmail.h
from: char *crypt();
to: /* char *crypt(); */

01.30.01 - many code changes on the way on the upcoming release (0.09)
many of these changes were made by Eric Peters (epeters@bluedot.net)

10.21.01 - Released vadmin-1.01
Vadmin is like vqadmin.
vadmin is written in perl and should be easy to customize/modify/improve.

08.11.01 - Cleaned up code to (hopefully) work with versions of perl older than 5.6.0
Added function: vauth_setpw()

06.17.01 - released vfinger.pl as a sample kinda thing.

support

If you need support, you can subscribe to the vpopmail.pm mailing list

the mailinglist is being archived in realtime Here

#/usr/local/bin/perl
use vpopmail;

use constant	APOP => 0; 

if ( ( adddomain('mail.com' ) ) == 0 ) {
  print "adddomain() ok\n";
}

#
if ( ( vadduser('user', 'mail.com', 'p@ss', 'real name', APOP) ) == 0 ) {
    print "vadduser() ok\n";
}

#
if ( vauth_user('user', 'mail.com', 'p@ss', APOP)) {
    print "vauth_user() ok\n";
}

#
if ( ( vsetuserquota('user', 'mail.com', '5M') ) == 0 ) {
	print "vsetuserquota() ok\n";
}

#
if ( ( vdeluser('user', 'mail.com') ) == 0 ) {
    print "vdeluser() ok\n";
}

Download

latest development version - Here you can get the latest version.

lastest public release - (0.08) Here you can get the lastest (stable) version on The CPAN