my ($x, $y, $z) = ('', '', '');
($x, $y, $z) = split(',', $_);