my @numbers=(4,7,11,14);
my $start='0 ';
my $middle=' 0 ';
my $end="\n";
print $start,join("$middle",@numbers),$end;