Bill – We shortened a loop in hcienginestop (I think this was a suggestion from Charlie Bursell at a user conference) to decrease the delay in hcienginestop before it progresses to killing a stuck process – see below:
sub waitForIt {
local( $name ) = @_;
local( $tries ) = 9;