#!/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{$_}});
}