Inverted index: Difference between revisions

Content added Content deleted
m (→‎{{header|Perl 6}}: moved hash initialization inside do block)
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:push: $file X=> slurp($file).lc.words;
%norm.push: $file X=> slurp($file).lc.words;
}
}
(my %inv).push: %norm.invert.unique;
(my %inv).push: %norm.invert.unique;