[libvirt] [perl][PATCH 0/4] Fix coverage