@array[0..4] = (0) x 5;

##</code><code>##

my $s = "\0" x 5;