Pangram checker: Difference between revisions
m
→{{header|Raku}}: add missing necessary semicolon, remove redundant optional semicolon
Thundergnat (talk | contribs) m (syntax highlighting fixup automation) |
Thundergnat (talk | contribs) m (→{{header|Raku}}: add missing necessary semicolon, remove redundant optional semicolon) |
||
Line 2,978:
(formerly Perl 6)
<syntaxhighlight lang="raku" line>constant Eng = set 'a' .. 'z';
constant Cyr = (set 'а' .. 'ё') (-) (set 'ъ', 'ѐ');
constant Hex = set 'a' .. 'f';
sub pangram($str, Set $alpha = Eng) {
$alpha ⊆ $str.lc.comb
}
| |||