Sha256: b1d846a0fd7f247899bae121f26a6af02aa910707399a5377cbc38fc88910d23

Contents?: true

Size: 189 Bytes

Versions: 73

Compression:

Stored size: 189 Bytes

Contents

package Phrase;
use strict;
use warnings;

sub word_count {
    my ($text) = @_;
    my %count;

	foreach my $word ($text =~ /(\w+)/g) {
		$count{lc $word}++;
	}

    return \%count;
}

1;

Version data entries

73 entries across 73 versions & 1 rubygems

Version Path
trackler-2.2.1.180 tracks/perl5/exercises/word-count/.meta/solutions/Phrase.pm
trackler-2.2.1.179 tracks/perl5/exercises/word-count/.meta/solutions/Phrase.pm
trackler-2.2.1.178 tracks/perl5/exercises/word-count/.meta/solutions/Phrase.pm
trackler-2.2.1.177 tracks/perl5/exercises/word-count/.meta/solutions/Phrase.pm
trackler-2.2.1.176 tracks/perl5/exercises/word-count/.meta/solutions/Phrase.pm
trackler-2.2.1.175 tracks/perl5/exercises/word-count/.meta/solutions/Phrase.pm
trackler-2.2.1.174 tracks/perl5/exercises/word-count/.meta/solutions/Phrase.pm
trackler-2.2.1.173 tracks/perl5/exercises/word-count/.meta/solutions/Phrase.pm
trackler-2.2.1.172 tracks/perl5/exercises/word-count/.meta/solutions/Phrase.pm
trackler-2.2.1.171 tracks/perl5/exercises/word-count/.meta/solutions/Phrase.pm
trackler-2.2.1.170 tracks/perl5/exercises/word-count/.meta/solutions/Phrase.pm
trackler-2.2.1.169 tracks/perl5/exercises/word-count/.meta/solutions/Phrase.pm
trackler-2.2.1.167 tracks/perl5/exercises/word-count/.meta/solutions/Phrase.pm
trackler-2.2.1.166 tracks/perl5/exercises/word-count/.meta/solutions/Phrase.pm
trackler-2.2.1.165 tracks/perl5/exercises/word-count/.meta/solutions/Phrase.pm
trackler-2.2.1.164 tracks/perl5/exercises/word-count/.meta/solutions/Phrase.pm
trackler-2.2.1.163 tracks/perl5/exercises/word-count/.meta/solutions/Phrase.pm
trackler-2.2.1.162 tracks/perl5/exercises/word-count/.meta/solutions/Phrase.pm
trackler-2.2.1.161 tracks/perl5/exercises/word-count/.meta/solutions/Phrase.pm
trackler-2.2.1.160 tracks/perl5/exercises/word-count/.meta/solutions/Phrase.pm