my %h = (
    1 => 'bleen',
    2 => 'grue',
    3 => 'smellow',
);

for my $count (1..3){
    print $h{$count};
}