my ($x,$y,$z);
$x='a';
$y='b';
$z='c';