The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.
#!/usr/bin/perl -w

# Basic first pass API testing for File::Tasks

use strict;

# Load the API to test it
use File::Tasks;

# Execute the tests
use Test::More tests => 58;
use Test::ClassAPI;

# Execute the tests
Test::ClassAPI->execute('complete', 'collisions');

exit(0);

__DATA__

File::Tasks::Task=abstract

[File::Tasks]
new=method
provider=method
ignore=method
task=method
tasks=method
paths=method
add=method
edit=method
remove=method
remove_dir=method
set=method
clashes=method
test=method
execute=method
overlay=method

[File::Tasks::Task]
type=method
new=method
path=method
test=method
execute=method

[File::Tasks::Add]
File::Tasks::Task=isa
source=method
content=method

[File::Tasks::Edit]
File::Tasks::Task=isa
source=method
content=method

[File::Tasks::Remove]
File::Tasks::Task=isa

[File::Tasks::Provider]
compatible=method
content=method