my $set = $hash{$set}; my $data = $set->{data}; for (@$data) { $set->{min} = $set->{min} < $_ ? $set->{min} : $_; }