Sha256: 598670c4a9892fb5f6c86253d4e8a6e1cf47eff458a78cd4f9fac98b19404a95

Contents?: true

Size: 391 Bytes

Versions: 323

Compression:

Stored size: 391 Bytes

Contents

package Example;

use strict;
use warnings;

use DateTime;

sub new {
  my ($class, $year, $month, $day) = @_;

  my $date = DateTime->new(year => $year, month => $month, day => $day);
  my $giga = DateTime::Duration->new(seconds => 1_000_000_000);
  bless { date => $date->add_duration($giga) }, $class;
}

sub date {
  my ($self) = @_;
  return $self->{date}->truncate(to => 'day');
}

1;

Version data entries

323 entries across 323 versions & 1 rubygems

Version Path
trackler-2.2.1.85 tracks/perl5/exercises/gigasecond/Example.pm
trackler-2.2.1.84 tracks/perl5/exercises/gigasecond/Example.pm
trackler-2.2.1.83 tracks/perl5/exercises/gigasecond/Example.pm
trackler-2.2.1.82 tracks/perl5/exercises/gigasecond/Example.pm
trackler-2.2.1.81 tracks/perl5/exercises/gigasecond/Example.pm
trackler-2.2.1.80 tracks/perl5/exercises/gigasecond/Example.pm
trackler-2.2.1.79 tracks/perl5/exercises/gigasecond/Example.pm
trackler-2.2.1.78 tracks/perl5/exercises/gigasecond/Example.pm
trackler-2.2.1.77 tracks/perl5/exercises/gigasecond/Example.pm
trackler-2.2.1.76 tracks/perl5/exercises/gigasecond/Example.pm
trackler-2.2.1.75 tracks/perl5/exercises/gigasecond/Example.pm
trackler-2.2.1.74 tracks/perl5/exercises/gigasecond/Example.pm
trackler-2.2.1.73 tracks/perl5/exercises/gigasecond/Example.pm
trackler-2.2.1.72 tracks/perl5/exercises/gigasecond/Example.pm
trackler-2.2.1.71 tracks/perl5/exercises/gigasecond/Example.pm
trackler-2.2.1.70 tracks/perl5/exercises/gigasecond/Example.pm
trackler-2.2.1.69 tracks/perl5/exercises/gigasecond/Example.pm
trackler-2.2.1.68 tracks/perl5/exercises/gigasecond/Example.pm
trackler-2.2.1.67 tracks/perl5/exercises/gigasecond/Example.pm
trackler-2.2.1.66 tracks/perl5/exercises/gigasecond/Example.pm