my $int = $mw->interp;
$int->Eval("...");

_do_something{}