Here's an example script/screenshot to go with this.
Code:
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);
}
}
Everquest is a registered trademark of Daybreak Game Company LLC.
EQEmulator is not associated or affiliated in any way with Daybreak Game Company LLC.
Except where otherwise noted, this site is licensed under a Creative Commons License.