for my $min ($hash{$set}{min}) {
    my $data = $hash{$set}{data};
    my $i = -1;
    while(++$i < @$data) {
        $min = $min < $data->{$i}
            ? $min
            : $data->{$i};
    }
}