Help for this page

Select Code to Download


  1. or download this
    
    perl -MList::Util="all" -lne "next unless/.../;my(%r,$c);$r{$_}++for(/
    +./g);print if all{++$c==$_}sort values %r" linux.words
    ...
    
    perl -MList::Util="all" -lne "next unless/.{10,}/;my(%r,$c);$r{$_}++fo
    +r(/./g);print if all{++$c==$_}sort values %r" linux.words