local($x) = $y =~ /^(z*)/;