Select Code to Download

use strict; use warnings; use feature 'say';

...
my %y = map { $_ => 1 } @x;

say "missing: $_" for grep { not exists $y{ $_ } } ( -2 .. 10 );

perl 1186862.pl
missing: -1
...
missing: 6
missing: 7
missing: 9