#!/usr/bin/perl -w
use strict;


my %hash = ('1' => 'cat',
'3'=> 'mouse',
'5'=>'whale'
);

my $elem = 2;

if (defined($hash{$elem})) {
   print $hash{$elem} } 
elsif (defined $hash{$elem + 1} )
  {
  print $hash{$elem+1}
 }
else {
  print 'ERROR!!!!!!';
} 

1;