NAME

SYNOPSIS

    use Test::Compile::Internal;
    my $test = Test::Compile::Internal->new();
    $test->all_files_ok();
    $test->done_testing();

DESCRIPTION

It is primarily to provide the inner workings of "Test::Compile", but it can also be used directly to test a CPAN distribution.

METHODS

"new()"

A basic constructor, nothing special.

"all_files_ok(@dirs)"

Looks for perl files and tests them all for compilation errors.

If @dirs is defined then it is taken as an array of files or directories to be searched for perl files, otherwise it searches the default locations you'd expect to find perl files in a perl module - see "all_pm_files(@dirs)" and "all_pl_files(@dirs)" for details.

"all_pm_files_ok(@dirs)"

Checks all the perl module files it can find for compilation errors.

If @dirs is defined then it is taken as an array of files or directories to be searched for perl files, otherwise it searches some default locations - see "all_pm_files(@dirs)".

"all_pl_files_ok(@dirs)"

Checks all the perl program files it can find for compilation errors.

If @dirs is defined then it is taken as an array of directories to be searched for perl files, otherwise it searches some default locations - see "all_pl_files(@dirs)".

"verbose($verbose)"

An accessor to get/set the verbosity. The default value (undef) will suppress output unless the compilation fails. This is probably what you want.

If "verbose" is set to true, you'll get the output from 'perl -c'. If it's set to false, all diagnostic output is suppressed.

"all_pm_files(@dirs)"

Searches for and returns a list of perl module files - that is, files with a .pm extension.

If you provide a list of @dirs, it'll use that as a list of files to process, or directories to search for perl modules.

If you don't provide "dirs", it'll search for perl modules in the blib directory, unless that directory doesn't exist, in which case it'll search the lib directory.

Skips any files in CVS, .svn, or .git directories.

The order of the files returned is machine-dependent. If you want them sorted, you'll have to sort them yourself.

"all_pl_files(@dirs)"

Searches for and returns a list of perl script files - that is, any files that either have a .pl extension, or have no extension but have a perl shebang line.

If you provide a list of @dirs, it'll use that as a list of files to process, or directories to search for perl scripts.

If you don't provide "dirs", it'll search for perl scripts in the blib/script/ directory, or if that doesn't exist, the script/ directory, or if that doesn't exist, the bin/ directory.

Skips any files in CVS, .svn, or .git directories.

The order of the files returned is machine-dependent. If you want them sorted, you'll have to sort them yourself.

"pl_file_compiles($file)"

Returns true if $file compiles as a perl script.

"pm_file_compiles($file)"

Returns true if $file compiles as a perl module.

TEST METHODS

"done_testing()"

Declares that you are done testing, no more tests will be run after this point.

"ok($test, $name)"

Your basic test. Pass if $test is true, fail if $test is false. Just like "Test::Simple"'s "ok()".

"plan(tests => $count)"

Defines how many tests you plan to run.

"diag(@msgs)"

Prints out the given @msgs. Like print, arguments are simply appended together.

Output will be indented and marked with a # so as not to interfere with test output. A newline will be put on the end if there isn't one already.

We encourage using this rather than calling print directly.

"skip($reason)"

Skips the current test, reporting the $reason.

"skip_all($reason)"

Skips all the tests, using the given $reason. Exits immediately with 0.

AUTHORS

COPYRIGHT AND LICENSE

This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself.

SEE ALSO