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.55	tracks/perl6/exercises/clock/Example.pm6
trackler-2.2.1.54	tracks/perl6/exercises/clock/Example.pm6
trackler-2.2.1.53	tracks/perl6/exercises/clock/Example.pm6
trackler-2.2.1.52	tracks/perl6/exercises/clock/Example.pm6
trackler-2.2.1.51	tracks/perl6/exercises/clock/Example.pm6
trackler-2.2.1.50	tracks/perl6/exercises/clock/Example.pm6
trackler-2.2.1.49	tracks/perl6/exercises/clock/Example.pm6
trackler-2.2.1.48	tracks/perl6/exercises/clock/Example.pm6
trackler-2.2.1.47	tracks/perl6/exercises/clock/Example.pm6
trackler-2.2.1.46	tracks/perl6/exercises/clock/Example.pm6
trackler-2.2.1.45	tracks/perl6/exercises/clock/Example.pm6
trackler-2.2.1.44	tracks/perl6/exercises/clock/Example.pm6
trackler-2.2.1.43	tracks/perl6/exercises/clock/Example.pm6
trackler-2.2.1.42	tracks/perl6/exercises/clock/Example.pm6
trackler-2.2.1.41	tracks/perl6/exercises/clock/Example.pm6
trackler-2.2.1.40	tracks/perl6/exercises/clock/Example.pm6
trackler-2.2.1.39	tracks/perl6/exercises/clock/Example.pm6
trackler-2.2.1.38	tracks/perl6/exercises/clock/Example.pm6
trackler-2.2.1.37	tracks/perl6/exercises/clock/Example.pm6
trackler-2.2.1.36	tracks/perl6/exercises/clock/Example.pm6