Select Code to Download

use List::Utils qw(reduce);

...
    # respectively update the aggregates by adding the first item
    # and subtracting the item that just fell out of the reporting win
+dow
};