print substr obj->test, 20_000, 5;
substr( obj->test, 20_000, 5 ) = 'hello';