view release on metacpan or  search on metacpan

t/01-basic.t  view on Meta::CPAN

#!/usr/bin/env perl
use Test::More;
use lib 'lib';
use AnyEvent::Cron;
my $cron = AnyEvent::Cron->new;
ok( $cron );

my $cv = AnyEvent->condvar;
ok( $cv );

my $cnt = 0;
$cv->begin;
$cron->add( '* * * * * *' => sub {