extract Event::Cloner

Another extract method object refactoring in the aim of slimming down the Event god object.