Isograms and heterograms: Difference between revisions

m
make comment match code
m (→‎{{header|Perl}}: clip file path)
m (make comment match code)
Line 338:
}
 
say scalar(@heterogram) . " heterograms with 10more orthan more10 characters:\n" . join "\n", sort { length $b <=> length $a } @heterogram;</lang>
{{out}}
<pre style="height:40ex">2 3-isograms:
Line 377:
ii
 
32 heterograms with 10more orthan more10 characters:
ambidextrous
bluestocking
Line 515:
my $minchars = 10;
 
say "\n({+$_}) heterograms with $mincharsmore orthan more$minchars characters:\n" ~
.sort({[-.chars, ~$_]}).join: "\n" given
@words.race.grep({.key.chars >$minchars && .value.values.max == 1})».key;</lang>
Line 556:
ii
 
(32) heterograms with 10more orthan more10 characters:
ambidextrous
bluestocking
10,327

edits