Sha256: 0f6862c5f5d4378012ced65a7b3ed65f86bb6181a6ff24a416dbde8abe9a448a

Contents?: true

Size: 542 Bytes

Versions: 185

Compression:

Stored size: 542 Bytes

Contents

unit module Scrabble:ver<1>;

sub score (Str:D $word --> Int:D) is export {
  my $score = 0;
  for $word.lc.split('',:skip-empty) -> $letter {
    given $letter {
      when * ~~ /<[aeioulnrst]>/ { $score += 1  }
      when * ~~ /<[dg]>/         { $score += 2  }
      when * ~~ /<[bcmp]>/       { $score += 3  }
      when * ~~ /<[fhvwy]>/      { $score += 4  }
      when * ~~ /k/              { $score += 5  }
      when * ~~ /<[jx]>/         { $score += 8  }
      when * ~~ /<[qz]>/         { $score += 10 }
    }
  }
  return $score;
}

Version data entries

185 entries across 185 versions & 1 rubygems

Version Path
trackler-2.2.1.95 tracks/perl6/exercises/scrabble-score/Example.pm6
trackler-2.2.1.94 tracks/perl6/exercises/scrabble-score/Example.pm6
trackler-2.2.1.93 tracks/perl6/exercises/scrabble-score/Example.pm6
trackler-2.2.1.92 tracks/perl6/exercises/scrabble-score/Example.pm6
trackler-2.2.1.91 tracks/perl6/exercises/scrabble-score/Example.pm6
trackler-2.2.1.90 tracks/perl6/exercises/scrabble-score/Example.pm6
trackler-2.2.1.89 tracks/perl6/exercises/scrabble-score/Example.pm6
trackler-2.2.1.88 tracks/perl6/exercises/scrabble-score/Example.pm6
trackler-2.2.1.87 tracks/perl6/exercises/scrabble-score/Example.pm6
trackler-2.2.1.86 tracks/perl6/exercises/scrabble-score/Example.pm6
trackler-2.2.1.85 tracks/perl6/exercises/scrabble-score/Example.pm6
trackler-2.2.1.84 tracks/perl6/exercises/scrabble-score/Example.pm6
trackler-2.2.1.83 tracks/perl6/exercises/scrabble-score/Example.pm6
trackler-2.2.1.82 tracks/perl6/exercises/scrabble-score/Example.pm6
trackler-2.2.1.81 tracks/perl6/exercises/scrabble-score/Example.pm6
trackler-2.2.1.80 tracks/perl6/exercises/scrabble-score/Example.pm6
trackler-2.2.1.79 tracks/perl6/exercises/scrabble-score/Example.pm6
trackler-2.2.1.78 tracks/perl6/exercises/scrabble-score/Example.pm6
trackler-2.2.1.77 tracks/perl6/exercises/scrabble-score/Example.pm6
trackler-2.2.1.76 tracks/perl6/exercises/scrabble-score/Example.pm6