my $i=10;
say($i--);
say($i--);
say(--$i);
say(--$i);

__END__
10
9
7
6