Switzerland beats Canada to stay perfect at World Hockey Championship