Inverted index: Difference between revisions
Content added Content deleted
SqrtNegInf (talk | contribs) m (→{{header|Perl 6}}: moved hash initialization inside do block) |
SqrtNegInf (talk | contribs) m (→{{header|Perl 6}}: fixed my typo) |
||
Line 2,031: | Line 2,031: | ||
my %norm; |
my %norm; |
||
do for @files -> $file { |
do for @files -> $file { |
||
%norm |
%norm.push: $file X=> slurp($file).lc.words; |
||
} |
} |
||
(my %inv).push: %norm.invert.unique; |
(my %inv).push: %norm.invert.unique; |