my ($x, $_, $z) = split(",",",'7,8,9');