my $die = entangle( 1=>1, 1=>2, 1=>3, 1=>4, 1=>5, 1=>6 );
my $save_state = $die->save_state;
for (1..5) {
	print "$die ";
	$die = $save_state->restore_state;
}
# print: "2 1 3 2 5" or whatever