xref: /openbsd/gnu/usr.bin/perl/ext/SDBM_File/grind (revision b8851fcc)
1#!/bin/sh
2rm -f /tmp/*.dir /tmp/*.pag
3awk -e '{
4        printf "%s\t", $0
5        for (i = 0; i < 40; i++)
6                printf "%s.", $0
7        printf "\n"
8}' < /usr/dict/words | $1 build /tmp/$2
9
10