awwaiid@feline:~/projects/perl/setdb$ ./setdb_demo.pl
Name: Bob
  Book: How to Take Over the World!
  Book: When I Went Shopping
Name: Joe
Name: Frank
  Book: How to Take Over the World! sucks!
  Book: How to build a turtle
  Book: Turtle Soup

awwaiid@feline:~/projects/perl/setdb$ ./setdb_demo.pl
Name: Bob
  Book: How to Take Over the World! sucks! sucks!
  Book: When I Went Shopping sucks!
Name: Joe
Name: Frank
  Book: How to Take Over the World! sucks! sucks! sucks!
  Book: How to build a turtle sucks!
  Book: Turtle Soup sucks!