Sha256: f8b453df5a88a0bec7164523fcfca46ef0fcc9498554c07312136b45c82693ae
Contents?: true
Size: 820 Bytes
Versions: 8
Compression:
Stored size: 820 Bytes
Contents
#!/usr/bin/env perl6
use v6;
use Test;
use lib IO::Path.new($?FILE).parent.path;
plan 10;
BEGIN {
my $module = %*ENV{'EXERCISM'} ?? 'Example' !! 'Scrabble';
EVAL("use $module")
};
pass 'Load module';
ok Scrabble.can('score'), 'Scrabble class has score() method';
my $scrabble = Scrabble.new();
is $scrabble.score(""), 0, "empty word scores 0";
is $scrabble.score(" \t\n"), 0, "whitespace scores 0";
is $scrabble.score("a"), 1, "a scores 1";
is $scrabble.score("f"), 4, "f scores 4";
is $scrabble.score("street"), 6, "street scores 6";
is $scrabble.score("alacrity"), 13, "alacrity scores 13";
is $scrabble.score("OXYPHENBUTAZONE"), 41, "OXYPHENBUTAZONE scores 41";
is $scrabble.score("quirky"), 22, "quirky scores 22";
Version data entries
8 entries across 8 versions & 1 rubygems