#!/usr/bin/perl
#use Mooix::Thing;
run sub {
	my $this=shift;
	%_=@_;

	# Don't let a builder spoof a programmer that they own to call this
	# method.
        if ($_{avatar} != $this) {
		fail "No!"; 
	}
	
	# Eval using the defaultlang.
	my $verb="eval_".$this->defaultlang."_verb";
	if (! $this->implements($verb)) {
		fail "Eval failure: $verb does not exist";
	}
	$this->$verb(@_);
}
