use t::test;
sub _require : Test(startup => 1) {
my ($self) = @_;
use_ok 'App::PRT::Collector::FileHandle';
}
sub instantiate : Tests {
isa_ok App::PRT::Collector::FileHandle->new, 'App::PRT::Collector::FileHandle';
}
sub collect : Tests {
my $directory = t::test::prepare_test_code('dinner');
my $fh = file("$directory/lib/My/Food.pm")->open;
my $collector = App::PRT::Collector::FileHandle->new($fh);
cmp_deeply $collector->collect, [
re(qr/prt-....\.pm/),
];
}