my $z = xvals zeros(5,5);
print $z;