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.35	tracks/perl6/exercises/clock/Example.pm6
trackler-2.2.1.34	tracks/perl6/exercises/clock/Example.pm6
trackler-2.2.1.33	tracks/perl6/exercises/clock/Example.pm6
trackler-2.2.1.32	tracks/perl6/exercises/clock/Example.pm6
trackler-2.2.1.31	tracks/perl6/exercises/clock/Example.pm6
trackler-2.2.1.30	tracks/perl6/exercises/clock/Example.pm6
trackler-2.2.1.29	tracks/perl6/exercises/clock/Example.pm6
trackler-2.2.1.28	tracks/perl6/exercises/clock/Example.pm6
trackler-2.2.1.27	tracks/perl6/exercises/clock/Example.pm6
trackler-2.2.1.26	tracks/perl6/exercises/clock/Example.pm6
trackler-2.2.1.25	tracks/perl6/exercises/clock/Example.pm6
trackler-2.2.1.24	tracks/perl6/exercises/clock/Example.pm6
trackler-2.2.1.23	tracks/perl6/exercises/clock/Example.pm6
trackler-2.2.1.22	tracks/perl6/exercises/clock/Example.pm6
trackler-2.2.1.21	tracks/perl6/exercises/clock/Example.pm6
trackler-2.2.1.20	tracks/perl6/exercises/clock/Example.pm6
trackler-2.2.1.19	tracks/perl6/exercises/clock/Example.pm6
trackler-2.2.1.18	tracks/perl6/exercises/clock/Example.pm6
trackler-2.2.1.17	tracks/perl6/exercises/clock/Example.pm6
trackler-2.2.1.16	tracks/perl6/exercises/clock/Example.pm6