Select Code to Download

use strict;
use DBI;
...
    $book->{title} .= ' sucks!';
  }
}

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