Contents

unit class Clock:ver<1>;

has Int:D $.hour = 0;
has Int:D $.minute = 0;

method time {
  sprintf '%02d:%02d', ($!hour + $!minute div 60) % 24, $!minute % 60;
}

method add-minutes (Int:D $min) {
  $!minute += $min and return self;
}

Version data entries

133 entries across 133 versions & 1 rubygems

Version	Path
trackler-2.2.1.75	tracks/perl6/exercises/clock/Example.pm6
trackler-2.2.1.74	tracks/perl6/exercises/clock/Example.pm6
trackler-2.2.1.73	tracks/perl6/exercises/clock/Example.pm6
trackler-2.2.1.72	tracks/perl6/exercises/clock/Example.pm6
trackler-2.2.1.71	tracks/perl6/exercises/clock/Example.pm6
trackler-2.2.1.70	tracks/perl6/exercises/clock/Example.pm6
trackler-2.2.1.69	tracks/perl6/exercises/clock/Example.pm6
trackler-2.2.1.68	tracks/perl6/exercises/clock/Example.pm6
trackler-2.2.1.67	tracks/perl6/exercises/clock/Example.pm6
trackler-2.2.1.66	tracks/perl6/exercises/clock/Example.pm6
trackler-2.2.1.65	tracks/perl6/exercises/clock/Example.pm6
trackler-2.2.1.64	tracks/perl6/exercises/clock/Example.pm6
trackler-2.2.1.63	tracks/perl6/exercises/clock/Example.pm6
trackler-2.2.1.62	tracks/perl6/exercises/clock/Example.pm6
trackler-2.2.1.61	tracks/perl6/exercises/clock/Example.pm6
trackler-2.2.1.60	tracks/perl6/exercises/clock/Example.pm6
trackler-2.2.1.59	tracks/perl6/exercises/clock/Example.pm6
trackler-2.2.1.58	tracks/perl6/exercises/clock/Example.pm6
trackler-2.2.1.57	tracks/perl6/exercises/clock/Example.pm6
trackler-2.2.1.56	tracks/perl6/exercises/clock/Example.pm6