#!/usr/bin/perl

use strict;

my %hash;
$hash{"cat"} = 2;
$hash{"dog"} = 1;
$hash{"cow"} = 17;

my @arr = sort values %hash;

print "arr : @arr\n";