Select Code to Download

HEAD
bead
...
boat
boot
FOOT

#!/usr/bin/perl
#ver 1.02
...
    print join "-", @way;
    print "\n";
}

#!/usr/bin/perl
#ver 2.00
...
    store $db, 'dictionary.db';
    return retrieve('dictionary.db');
}