#!/usr/bin/perl
#use Mooix::Thing;
run sub {
	my $this=shift;
	%_=@_;
	my $preposition = lc($_{preposition});
	
	my @valid = $this->valid_prepositions;
	if (length $preposition && ! grep { $_ eq $preposition } @valid) {
		return; # bad one
	}
	return @valid;
}
