package CowboyNeal;

sub DESTROY {
	my $self = shift;
	print ref($self), " is going away.  It was known as ", $self->name(), " back in the day.\n";
}