use strict;
use warnings;

my @array = qw(1 3 5 6);

++$_ for @array;
print "@array";

##</code><code>##

2 4 6 7