sub DESTROY {
	my $self = shift;
	$self->{first} = undef;
	$self->{last} = undef;
}