CTest - Perl extension for testing local 'C' routines
use CTest;
This module consists of various test routines to exercise the subroutines in the the 'C' pieces for bdbaccess
$rv=t_main(qw(program_name args, arg2,..., argN);
input: program name -d -f etc... see readme output: number of arguments passed
t_setport(pnum);
set the port value to pnum input: integer port number output: none
t_setsig();
set the signal handler. test routine should issue SIGINT to child and catch resulting text
t_set_parent(val);
set the value of "parent" return the previous value
$pid = t_pidrun()
input: none output: pid found in pid file see t_chk4pid below
t_savpid(path2pidfile)
input: path to pid file output: none saves the pid of the current process in the pid file (path2pidfile)
$pidpath = t_chk4pid(path)
input: path to pid file output: undef or path to pid file checks for a process running with the pid found in "path". If the process is running return undef, otherwise return the "path". Always places the "pid" found in pid file into the variable "pidrun".
$pidpath = t_pidpath();
input: none output: current pidpath/file
$err = t_init(home,...);
input: dbhome, arg1...argN output: 0 or error code
$err = t_dump(which, name);
input: 0 = primary db or nz = secondary db, database name this only works for specific test sequence used in the test suite. output: 0 or error code prints database to STDOUT in the format dot.quad.addr => timestamp
t_close();
input: none output: none close the database files and environment
$data = t_get(which,addr,name);
input: 0 = primary db or nz = secondary db database name output: data (long) or undef if not there
($key,$data)=t_getrecno(which,name,cursor);
input: 0 = primary db or nz = secondary db database name, cursor (starting at 1) output: key, data
$string = t_bdberror(status);
input: BDB status code output: string representing the code
$version_string=t_bdbversion();
input: none output: BDB version
$nrecords = t_bdbcount(name);
input: name of database output: number of records in db
NOTE: database must be open
None
Michael Robinton <michael@bizsystems.com>
To install Mail::SpamCannibal, copy and paste the appropriate command in to your terminal.
cpanm
cpanm Mail::SpamCannibal
CPAN shell
perl -MCPAN -e shell install Mail::SpamCannibal
For more information on module installation, please visit the detailed CPAN module installation guide.