Sha256: 123bc0eb0f22b61141e50a93a3170f6b311027d75589554438a3661679729d3d

Contents?: true

Size: 437 Bytes

Versions: 75

Compression:

Stored size: 437 Bytes

Contents

class Anagram is export {
    method match ($word, @words) {
        my @results;
        my $canonical = self!canonize($word);
        for @words -> $w {
            next if $w.lc eq $word.lc;
            my $try = self!canonize($w);
            if $try eq $canonical {
                @results.push: $w;
            }
        }
        @results;
    }

    method !canonize($str) {
        (($str.lc.split('')).sort).join('');
    }
}

Version data entries

75 entries across 75 versions & 1 rubygems

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