Fix for accidental call of CGen::Perl->as_escaped from YATT::Lite::Util::escape($obj)

From now on, $obj->as_escaped is called from escape($obj)
only if $obj inherits YATT::Lite::Util::escapable.