sub new {
	my ($class, $args) = @_;
	my $self = bless({}, $class);
	$self->askSantaFor($class->wishList());
	return $self;
}