Isograms and heterograms: Difference between revisions

m
→‎{{header|Perl}}: clip file path
(Added Perl)
m (→‎{{header|Perl}}: clip file path)
Line 322:
use List::Util 'uniq';
 
my @words = map { lc } path('ref/unixdict.txt')->slurp =~ /^[A-z]{2,}$/gm;
 
my(@heterogram, %isogram);
2,392

edits