I haven't tested this yet, but I think something like this should work:
Code:
$client->UnscribeSpell(4586);
$client->UnscribeSpell(4516);
$client->UnscribeSpell(8030);
$client->UnscribeSpell(4585);
$client->UnscribeSpell(4587);
If that doesn't work, then we probably need to make a new quest command that lets you unscribe just one spell. Shouldn't be too hard to make.