my @x = ($a,$b) = (4,5,6);   # @x = (4,5)