* Revert previous patch.  For some reason perl doesn't like it.