Possible to add augment to loot items?

[lordnivek1]

Can you have a perl script add augments to an item it is adding to a mob when it spawns? If have tried and repeatedly failed to get this to happen lol. I am to the point if someone more knowledge would want to write a quest to do the below please send me a message. I would be willing to work out a donation for the code and time spent.

Below obviously is just what I am looking for in layman’s terms not actual code:

When a mob spawns I want a perl quest that fires to add an item to the mob. I want the item added to have random augments inserted into the item. In the zone folder I will name the quest the mobs name but there are different variations of the mob so I need it to trigger different items for each unique npc type id.

sub EVENT_SPAWN
1 in 10 chance to trigger 
if npc id = XXX
add random item from list (1, 4) to npc to loot
if 1
add random augment (69, 72, 81) to aug slot 1
add random augment (69, 72, 81) to aug slot 2
add random augment (69, 72, 81) to aug slot 3
add random augment (69, 72, 81) to aug slot 4
add random augment (91, 94, 96) to aug slot 5
add random augment (100, 142, 214) to aug slot 6
if 4
add random augment (45, 75, 81) to aug slot 1
add random augment (45, 75, 81) to aug slot 2
add random augment (45, 75, 81) to aug slot 3
add random augment (45, 75, 81) to aug slot 4
add random augment (45, 75, 81) to aug slot 5
add random augment (100, 142, 214) to aug slot 6
if npc id = XXX
add random item from list (6, 9) to npc to loot
**repeating as many times as needed**