Hi Rolf,

just wanted to post this snippet:

for my $host (keys %hosts) {
    next if $hosts{$host} == $table_count;
    delete $hosts{$host};
}
[download]

but checked the incomming answers before posting redundant things. In this case I had to smile because I do agree with your "taste" (++).

UPDATE: Had an logic error in there: changed < to ==.

McA