use strict;
use warnings;
while (1) {
	my %hash;
	@hash{0..10000} = (0..10000);
}