in reply to Re^2: How to add missing part in a Hash of Arrayin 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); [download]