Sha256: f6e893b1cca7c30398a9369917a3f9dbc86ac3831de3ac6360fcdb28af0215de

Contents?: true

Size: 535 Bytes

Versions: 75

Compression:

Stored size: 535 Bytes

Contents

class Scrabble is export {
    has %.values = (
            aeioulnrst => 1,
            dg         => 2,
            bcmp       => 3,
            fhvwy      => 4,
            k          => 5,
            jx         => 8,
            qz         => 10,
            ZERO       => 0,
        );

    method score ($word) {
        my $score = 0;

        for $word.lc.split('',:skip-empty) -> $letter {
            $score
            += self.values{ self.values.keys.first(/$letter/) or 'ZERO' };
        }
        return $score;
    }
}

Version data entries

75 entries across 75 versions & 1 rubygems

Version Path
trackler-2.0.8.28 tracks/perl6/exercises/scrabble-score/Example.pm
trackler-2.0.8.27 tracks/perl6/exercises/scrabble-score/Example.pm
trackler-2.0.8.26 tracks/perl6/exercises/scrabble-score/Example.pm
trackler-2.0.8.24 tracks/perl6/exercises/scrabble-score/Example.pm
trackler-2.0.8.23 tracks/perl6/exercises/scrabble-score/Example.pm
trackler-2.0.8.22 tracks/perl6/exercises/scrabble-score/Example.pm
trackler-2.0.8.21 tracks/perl6/exercises/scrabble-score/Example.pm
trackler-2.0.8.20 tracks/perl6/exercises/scrabble-score/Example.pm
trackler-2.0.8.19 tracks/perl6/exercises/scrabble-score/Example.pm
trackler-2.0.8.18 tracks/perl6/exercises/scrabble-score/Example.pm
trackler-2.0.8.17 tracks/perl6/exercises/scrabble-score/Example.pm
trackler-2.0.8.16 tracks/perl6/exercises/scrabble-score/Example.pm
trackler-2.0.8.15 tracks/perl6/exercises/scrabble-score/Example.pm
trackler-2.0.8.14 tracks/perl6/exercises/scrabble-score/Example.pm
trackler-2.0.8.13 tracks/perl6/exercises/scrabble-score/Example.pm
trackler-2.0.8.12 tracks/perl6/exercises/scrabble-score/Example.pm
trackler-2.0.8.11 tracks/perl6/exercises/scrabble-score/Example.pm
trackler-2.0.8.10 tracks/perl6/exercises/scrabble-score/Example.pm
trackler-2.0.8.9 tracks/perl6/exercises/scrabble-score/Example.pm
trackler-2.0.8.8 tracks/perl6/exercises/scrabble-score/Example.pm