diff options
| author | Jarkko Hietaniemi <jhi@iki.fi> | 2006-07-15 16:14:32 +0300 |
|---|---|---|
| committer | H.Merijn Brand <h.m.brand@xs4all.nl> | 2006-07-15 11:53:36 +0000 |
| commit | d130778686fc2c04eb7d731512df9e71304d5573 (patch) | |
| tree | 74953202209cd3371cc54464d6300b2dea41d77a /pp_sys.c | |
| parent | 59bea8cf0bba843bea2b2a6c959c3fd1cf5e3075 (diff) | |
| download | perl-d130778686fc2c04eb7d731512df9e71304d5573.tar.gz | |
various safety/portability tweaks
Message-ID: <44B8C008.4030300@iki.fi>
p4raw-id: //depot/perl@28578
Diffstat (limited to 'pp_sys.c')
| -rw-r--r-- | pp_sys.c | 3 |
1 files changed, 2 insertions, 1 deletions
@@ -3589,7 +3589,8 @@ S_dooneliner(pTHX_ const char *cmd, const char *filename) *s++ = '\\'; *s++ = *filename++; } - strcpy(s, " 2>&1"); + if (s - cmdline < size) + my_strlcpy(s, " 2>&1", size - (s - cmdline)); myfp = PerlProc_popen(cmdline, "r"); Safefree(cmdline); |