Select Code to Download

use warnings;
use strict;
...
}

pp \%required; #{ a => [1, 3, 5], b => [2, 4, 6] }

### assume that some keys could be missing or others added

...
}
pp $data2;
pp \%required2;

[
  { a => 1 },
...
  c => [0, 0, 7, 8, 8],
  d => [0, 0, 0, 0, 9],
}