COMMITTED: Allow books to be sent in perl

[Secrets]

Here's an example script/screenshot to go with this.

sub EVENT_SAY {

if($text=~/hail/i) {
$client->ReadBook("This is not a test item! THIS IS REALLY PERL", 0);
$client->ReadBook("This is a book!", 1);
}

}

[trevius]

Wow, very cool, Secrets! Kinda like a variation of a popup message that you can't get a response from lol, but still really neat. I bet that would be nice for lore type stuff.

[Akkadius]

Just like the last feature I discussed with you Trevius, I talked this over with Secrets and she got it to work. Yes it is very awesome and I will be using it quite a bit... Official SVN I think 8 D