Use List::Util:

#!/usr/bin/perl

use List::Util qw(min max);
use feature qw(say);

%hash = (
  'id1' => [ 1, 25 ],
  'id2' => [ 1, 33, 0, 86 ],
  'id3' => [ 1, 33 ],
  'id4' => [ 1, 24, 24, 119, 24, 108 ],
  'id5' => [ 1, 20, 0, 56 ],
  'id6' => [ 29, 345 ],
);

foreach (sort keys %hash) {
  say "$_: min=" . min(@{$hash{$_}}) . ", max=" . max(@{$hash{$_}});
}
[download]

Output:

id1: min=1, max=25
id2: min=0, max=86
id3: min=1, max=33
id4: min=1, max=119
id5: min=0, max=56
id6: min=29, max=345
[download]

HTH!