Select Code to Download

use strict; 
use warnings; 
...

say "missing: $_" for grep { ! exists $y{$_} } $x[0] .. $x[-1];