Sha256: dc13b4f7032da93bdd8f72552c65b409a8757e4bca60cc9bd5448a79dd29eb3e

Contents?: true

Size: 558 Bytes

Versions: 20

Compression:

Stored size: 558 Bytes

Contents

use warnings;
use strict;
use Test::More tests => 7;

my $module = $ENV{EXERCISM} ? 'Example' : 'Leap';

use_ok($module)
    or BAIL_OUT ("You need to create a module called $module.pm.");
can_ok($module, 'is_leap')
    or BAIL_OUT("Missing package $module with sub is_leap()");

my $sub = $module->can('is_leap');

do {
    ok $sub->(1996), '1996 is a leap year';
    ok !$sub->(1997), '1997 is not a leap year';
    ok !$sub->(1998), '1998 is not a leap year';
    ok !$sub->(1900), '1900 is not a leap year';
    ok $sub->(2400), '2400 is a leap year';
}

Version data entries

20 entries across 20 versions & 1 rubygems

Version Path
trackler-2.0.0.9 tracks/perl5/leap/leap.t
trackler-2.0.0.8 tracks/perl5/leap/leap.t
trackler-2.0.0.7 tracks/perl5/leap/leap.t
trackler-2.0.0.6 tracks/perl5/leap/leap.t
trackler-2.0.0.5 tracks/perl5/leap/leap.t
trackler-2.0.0.4 tracks/perl5/leap/leap.t
trackler-2.0.0.3 tracks/perl5/leap/leap.t
trackler-2.0.0.2 tracks/perl5/leap/leap.t
trackler-2.0.0.1 tracks/perl5/leap/leap.t
trackler-2.0.0.0 tracks/perl5/leap/leap.t
trackler-1.0.4.1 tracks/perl5/leap/leap.t
trackler-1.0.4.0 tracks/perl5/leap/leap.t
trackler-1.0.3.0 tracks/perl5/leap/leap.t
trackler-1.0.2.1 tracks/perl5/leap/leap.t
trackler-1.0.2.0 tracks/perl5/leap/leap.t
trackler-1.0.1.2 tracks/perl5/leap/leap.t
trackler-1.0.1.1 tracks/perl5/leap/leap.t
trackler-1.0.1.0 tracks/perl5/leap/leap.t
trackler-1.0.0.1 tracks/perl5/leap/leap.t
trackler-1.0.0 tracks/perl5/leap/leap.t