finish 85% of perl plugin disk_raid