use warnings;
use strict;

map $_ -1, 1;