my $gah = join ('<br>', 
          map {"$_ = $somehash{$_}"} keys %somehash);