my ($present_1,$present_2,$present_3,$present_4,$present_5) = $verb;