use warnings;
@array = qw(X) x 2;
print @array, "\n";