Argument $test isn't numeric in substr at (re_eval 1) l