# Can't use multiple modifiers. Basic Plus2 was nice!
my last_nth = do { $_ for (keys %history) } while ( $history{ $_ } == ($histcount - $n) );  

my $last_nth = $_ if $history{ $_ } == n for (keys %history); # Again $_ is local