Browse code

app_perl: use snprintf instead of sprintf

Daniel-Constantin Mierla authored on 28/11/2019 18:58:48
Showing 1 changed files
... ...
@@ -220,7 +220,7 @@ PerlInterpreter *parser_init(void) {
220 220
 						PKG_MEM_ERROR;
221 221
 						return NULL;
222 222
 					}
223
-					sprintf(argv[argc], "-I%s", entry);
223
+					snprintf(argv[argc], strlen(entry)+20, "-I%s", entry);
224 224
 					modpathset_end = argc;
225 225
 					argc++;
226 226
 				}