sub evaluate {
	    my ($expression,$safeeval) = @_;
            return $safeeval->reval($expression);
        }

        sub run {
	    my ($code,$safeeval) = @_;
            $safeeval->reval($code);
        }