The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.

NAME

LEOCHARRE::Test - personal testing subs

EXPORTED

All are exported.

ok()

Like Test::Simple

ok_part()

Optional arg is message, helps read test output. Just a separator.

test_is_interactive()

Returns boolean. If run from a terminal, returns true, if from cpan, false.

ok_mysqld()

Argument is hostname. Tests if a mysqld host server is up.

mysqld_running()

Returns boolean. Optional argument is hostname. If it is localhost, uses ABS_MYSQLD status.

mysqld_exists()

stderr_spacer()

Prints two lines to stder

$LEOCHARRE::Test::ABS_MYSQLD

Holds abs path to mysqld, default is /etc/init.d/mysqld

AUTHOR

Leo Charre leocharre at cpan dot org

COPYRIGHT

Copyright (c) 2008 Leo Charre. All rights reserved.

LICENSE

This package is free software; you can redistribute it and/or modify it under the same terms as Perl itself, i.e., under the terms of the "Artistic License" or the "GNU General Public License".

DISCLAIMER

This package is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.

See the "GNU General Public License" for more details.