#!perl

use strict;
use warnings;

my $href = { '6' => '154', '4' => '152', '1' => '80', '3' => '151', '8' => '150' };

my $key   = (sort {$a <=> $b} keys %$href)[0];
my $value = $href->{$key};

print "$key => $value\n";

__END__
1 => 80