Yes, although ordering is not a property of untied hashes. So if you just want any 5 elements add a counter:

my $limit = 5;
while (my ($key, $value) = each %everything) {
    print "<tr><td>$key</td><td>$value</td></tr>";
    last unless --$limit;
}
[download]