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.95	tracks/perl6/exercises/clock/Example.pm6
trackler-2.2.1.94	tracks/perl6/exercises/clock/Example.pm6
trackler-2.2.1.93	tracks/perl6/exercises/clock/Example.pm6
trackler-2.2.1.92	tracks/perl6/exercises/clock/Example.pm6
trackler-2.2.1.91	tracks/perl6/exercises/clock/Example.pm6
trackler-2.2.1.90	tracks/perl6/exercises/clock/Example.pm6
trackler-2.2.1.89	tracks/perl6/exercises/clock/Example.pm6
trackler-2.2.1.88	tracks/perl6/exercises/clock/Example.pm6
trackler-2.2.1.87	tracks/perl6/exercises/clock/Example.pm6
trackler-2.2.1.86	tracks/perl6/exercises/clock/Example.pm6
trackler-2.2.1.85	tracks/perl6/exercises/clock/Example.pm6
trackler-2.2.1.84	tracks/perl6/exercises/clock/Example.pm6
trackler-2.2.1.83	tracks/perl6/exercises/clock/Example.pm6
trackler-2.2.1.82	tracks/perl6/exercises/clock/Example.pm6
trackler-2.2.1.81	tracks/perl6/exercises/clock/Example.pm6
trackler-2.2.1.80	tracks/perl6/exercises/clock/Example.pm6
trackler-2.2.1.79	tracks/perl6/exercises/clock/Example.pm6
trackler-2.2.1.78	tracks/perl6/exercises/clock/Example.pm6
trackler-2.2.1.77	tracks/perl6/exercises/clock/Example.pm6
trackler-2.2.1.76	tracks/perl6/exercises/clock/Example.pm6