Sha256: 94cae6a6472eeafc753638c0830289170e6b83ef4f0d00164c54d931123cbaef
Contents?: true
Size: 555 Bytes
Versions: 75
Compression:
Stored size: 555 Bytes
Contents
#!/usr/bin/env perl6
use v6;
use Test;
use lib IO::Path.new($?FILE).parent.path;
plan 8;
my $module = %*ENV<EXERCISM> ?? 'Example' !! 'Leap';
use-ok $module;
require ::($module) <Leap>;
ok Leap.can('is_leap'), 'Leap class has is_leap() method';
ok my $leap = Leap.new, 'Create new Leap object';
my %year = (
1996 => True,
1997 => False,
1998 => False,
1900 => False,
2400 => True,
);
for %year.sort -> $y {
is $leap.is_leap($y.key), $y.value,
[ flat( $y.key, 'is', 'not' xx !$y.value, 'a leap year' ) ].join( ' ' )
}
Version data entries
75 entries across 75 versions & 1 rubygems