Монтирование дисков синологии в человечности

Вот одноквартирный скрипт для генерации XKCD-стиль passphases. / usr / Share / Dict / Words Разве не отличный словарь для этого, поскольку большинство слов длинные, но он легко доступен. Для приятных пасфоров вы можете использовать словарь коротких слов, таких как / ключей одноразовый список слов пароля .

dict="/usr/share/dict/words"
max="`wc -l <"$dict"`" \
    perl -e '$count=4;
        $/=\4; while (<>) {
            print unpack('L') % $ENV{max} + 1, qq(\n); last unless --$count
        }' /dev/urandom | 
    while read n ; do 
        tail -n "+$n" "$dict" | head -1
    done