Does this make sense?
my @words = gather {
for =(open '/usr/share/dict/words' err die) {
.=chomp;
next if /<-[a-z]>/;
/$re/ and take { word => $_, score => %scores{ .letters }.sum };
}
} ==> sort { . } is descending, { ..length }, { . };
On Fri, 4 Feb 2005, Juerd wrote:
Does this make sense?
my @words = gather {
for =(open '/usr/share/dict/words' err die) {
.=chomp;
next if /<-[a-z]>/;
/$re/ and take { word => $_, score => %scores{ .letters }.sum };
}
} ==> sort { . } is descendi
Michele Dondi skribis 2005-02-07 11:45 (+0100):
> With some effort I managed to understand _which_ sense it should make up
> to this:
> > } ==> sort { . } is descending, { ..length }, { . };
> I mean: everything of what is gather()ed gets 'piped' into sort() which
> sorts according to C<< { . }
On Fri, Feb 04, 2005 at 10:39:30PM +0100, Juerd wrote:
: Does this make sense?
:
: my @words = gather {
: for =(open '/usr/share/dict/words' err die) {
: .=chomp;
: next if /<-[a-z]>/;
: /$re/ and take { word => $_, score => %scores{ .letters }.sum }