Select Code to Download

use List::Util qw[ reduce ];
my @in = ( 41888, 41889, 41890, 41892, 41895 );
...
print @missing;

41891 41893 41894

my @in = ( 41888, 41889, 41890, 41892, 41895 );
my @missing;
...
print @missing;

41891 41893 41894