OK for what? Tell us what you want and maybe we can tell you how to do it. If, for example, you want what you expected, it can be done explicitly with:

@x = ('',1,1,1,'','','','','','',1);
[download]