%hash = (
        'one' => [1],
        'two' => [2,2],
        'three' => [3,3,3],
);

  foreach my $array (keys %hash){
      print $array," :", scalar @{$hash{$array}},$/;
  }

##</code><code>##

three :3
one :1
two :2