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