Sha256: ead483ca3b16061b4e2ebe5512587c8e643a59b84a00750aa86db38cd318eccb

Contents?: true

Size: 273 Bytes

Versions: 145

Compression:

Stored size: 273 Bytes

Contents

# Declare package 'Leap' with version
package Leap 2;
use strict;
use warnings;

sub is_leap {
  my $year = shift;
  divisible_by($year, 400)
    or divisible_by($year, 4) and !divisible_by($year, 100)
    ? 1 : 0;
}

sub divisible_by {
  $_[0] % $_[1] == 0 ? 1 : 0;
}

1;

Version data entries

145 entries across 145 versions & 1 rubygems

Version Path
trackler-2.1.0.53 tracks/perl5/exercises/leap/Example.pm
trackler-2.1.0.52 tracks/perl5/exercises/leap/Example.pm
trackler-2.1.0.51 tracks/perl5/exercises/leap/Example.pm
trackler-2.1.0.50 tracks/perl5/exercises/leap/Example.pm
trackler-2.1.0.49 tracks/perl5/exercises/leap/Example.pm