Wrong forum. Should be in Quest:Q & A, just fyi.
Code:
sub EVENT_ITEM_CLICK {
if ($itemid = xxxx) {
$client->LearnRecipe(xx);
}
}
Save with
script_xxxx.pl in your /quests/global/items directory.
Ensure the item has a script number which coincides with whatever you put in place of xxxx (for script_xxxx.pl).
Not quite sure if it will work on books, have yet to try it, though at the moment I cannot think of why it wouldn't.