in reply to Re^2: How to add missing part in a Hash of Array
in thread How to add missing part in a Hash of Array

Maybe this helps?

use List::Util qw/min max/; # ... $HoA_sequence{$_} //= '-' for min(keys %HoA_sequence) .. max(keys %HoA_sequence);